回答編集履歴
1
使用例コードの間違いの修正
test
CHANGED
@@ -158,7 +158,7 @@
|
|
158
158
|
|
159
159
|
Dim myCopy As New MyCopyRange
|
160
160
|
|
161
|
-
myCopy.C
|
161
|
+
myCopy.Cut Range("B1:C4"), Range("E1"), PasteAll
|
162
162
|
|
163
163
|
End Sub
|
164
164
|
|