回答編集履歴
1
指定位置挿入の右辺を変更しました。
answer
CHANGED
|
@@ -17,7 +17,7 @@
|
|
|
17
17
|
|
|
18
18
|
' 指定位置へ挿入
|
|
19
19
|
With attachment
|
|
20
|
-
.Top =
|
|
20
|
+
.Top = ActiveSheet.Range("A1").Top
|
|
21
|
-
.Left =
|
|
21
|
+
.Left = ActiveSheet.Range("A1").Left
|
|
22
22
|
End With
|
|
23
23
|
```
|