回答編集履歴
1
追記
test
CHANGED
|
@@ -7,3 +7,11 @@
|
|
|
7
7
|
クリアをなくして下記のようにすれば実行できました。
|
|
8
8
|
|
|
9
9
|
wsDest.Range("1:1").PasteSpecial Paste:=xlPasteValues
|
|
10
|
+
|
|
11
|
+
|
|
12
|
+
|
|
13
|
+
コピーした後に全セルをクリアするなら、コピーした内容を
|
|
14
|
+
|
|
15
|
+
一旦、別シートに退避しておくか、変数等に退避しておくかする必要があると
|
|
16
|
+
|
|
17
|
+
思います。
|