質問編集履歴
1
コードの一部が間違っていたため修正
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -22,7 +22,7 @@
|
|
|
22
22
|
Range("A1:A150").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
|
|
23
23
|
|
|
24
24
|
'Bコード ※問題のコードです。
|
|
25
|
-
Range(Cells(
|
|
25
|
+
Range(Cells(1, 1), Cells(1, 150)).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
|
|
26
26
|
|
|
27
27
|
```
|
|
28
28
|
|