回答編集履歴
1
使用例コードの間違いの修正
answer
CHANGED
|
@@ -78,7 +78,7 @@
|
|
|
78
78
|
Public Sub Test3()
|
|
79
79
|
'カット＆ペースト 書式も含めて
|
|
80
80
|
Dim myCopy As New MyCopyRange
|
|
81
|
-
myCopy.
|
|
81
|
+
myCopy.Cut Range("B1:C4"), Range("E1"), PasteAll
|
|
82
82
|
End Sub
|
|
83
83
|
```
|
|
84
84
|
|