回答編集履歴
2
すみません。検証の結果、私が間違っておりました。
test
CHANGED
|
@@ -1,31 +1,9 @@
|
|
|
1
|
+
検証したところ、最初の私の回答が間違いであることを確認いたしました。
|
|
2
|
+
|
|
1
|
-
|
|
3
|
+
大変申し訳ございませんでした。
|
|
2
4
|
|
|
3
5
|
|
|
4
6
|
|
|
5
|
-
|
|
7
|
+
混乱防止のため、消去したしました。
|
|
6
8
|
|
|
7
9
|
|
|
8
|
-
|
|
9
|
-
もしかして、これが「行を削除する」命令となっていませんか？
|
|
10
|
-
|
|
11
|
-
この場合、Excelで実際に「行を削除する」のと異なり、「行の内容」が削除されたように見えても、
|
|
12
|
-
|
|
13
|
-
「その行に何かがあった」という情報までは削除されていません。
|
|
14
|
-
|
|
15
|
-
|
|
16
|
-
|
|
17
|
-
もし本当に「行を削除」するのであれば、
|
|
18
|
-
|
|
19
|
-
ThisWorkbook.Worksheets(2).Rows(LastRow & ":" & lp).Delete shift:=xlUP
|
|
20
|
-
|
|
21
|
-
(Excel上で「行を削除」するのと同じ)
|
|
22
|
-
|
|
23
|
-
あるいは
|
|
24
|
-
|
|
25
|
-
ThisWorkbook.Worksheets(2).Rows(LastRow & ":" & lp).Clear
|
|
26
|
-
|
|
27
|
-
(セルのデータと書式を消去するのと同じ)
|
|
28
|
-
|
|
29
|
-
|
|
30
|
-
|
|
31
|
-
とされた方がいいと思います。
|
1
2013ｄ
test
CHANGED
|
File without changes
|