No.3ベストアンサー
- 回答日時:
No.2の続きで補足します。
最終行 = Worksheets("sheet1").Range("A1048576").End(xlUp).Row
で、データが入ってる最下の行が500ならば、最終行に500が入ります。
これを使って
Worksheets("sheet1").Range("A1:A" & 最終行).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
とやります。
No.1は、それを一遍にやってるだけです。
この回答へのお礼
お礼日時:2023/03/03 22:13
なるほど!理解しました。
ご丁寧にありがとうございます_(._.)_
こちらを使ってやってみようと思います。
本当にたすかりました!
ご親切な説明に感謝いたします_(._.)_
No.2
- 回答日時:
>>最終行1048576を指定しないやり方もあるのでしょうか。
。「一番下まで」という指示の仕方もありますか?これは、そういう意味では無くて、下から上へ逆サーチして最初にヒットしたトコロを処理の最下行にしてるのです。
つまり、A列にデータがある最下の行を求めてるのです。
上から下へサーチすると、途中に歯抜けが有ったら、そこが処理の最下行になってしまって、その下が処理対象外になってしまいます。
No.1
- 回答日時:
Worksheets("sheet1").Range("A1:A最終行").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
A列の最終行は1,048,576なので、
最終行 = Worksheets("sheet1").Range("A1048576").End(xlUp).Row
纏めると
↓
Worksheets("sheet1").Range("A1:A" & Worksheets("sheet1").Range("A1048576").End(xlUp).Row).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Vba エクセルマクロで、 A列の、A1セルからA10セルに空白のある行を削除する、のは Range 3 2022/11/05 17:44
- Visual Basic(VBA) EXCEL VBAでA列にある空白行より下の行すべてを削除する方法を教えてください。 3 2023/02/17 07:02
- Visual Basic(VBA) vba エクセルマクロのことで教えてください。 A1 123 A2 234 A3 345 A4 45 1 2023/01/28 21:21
- Visual Basic(VBA) vbaエクセルマクロについて教えてください A列とD列が下のようになっています B列、C列にも何かし 2 2023/02/20 20:06
- Visual Basic(VBA) 複数csvを横に追加していくマクロについて 2 2023/04/25 09:19
- Visual Basic(VBA) vbaエクセルマクロ RemoveDuplicatesについて RemoveDuplicatesを使 3 2023/02/28 01:13
- Visual Basic(VBA) 3つのプロシージャをまとめたら実行時エラー発生で対応不能 6 2022/05/17 01:47
- Visual Basic(VBA) vbaエクセルマクロ RemoveDuplicatesについて RemoveDuplicatesを使 1 2023/02/27 22:21
- Visual Basic(VBA) フォルダの場所を可変にしたいです(マクロ) 4 2023/05/11 10:00
- Excel(エクセル) Excelにて、行の最後のセルの値をコピーして別sheetに張りつけるVBAコードをご教授願います 3 2022/11/20 14:35
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで空白行を削除する ...
-
列から特定の文字列検索→該当以...
-
エクセルで階層図を作る方法
-
【VBA】指定月のオートフィルタ...
-
マクロで最終行を取得してコピ...
-
【VBA】条件に一致しない行を削...
-
エクセル住所録でフラッグの個...
-
VBA 行削除した連番
-
VB.net
-
数値に見えるものはすべて数値...
-
【VBA】条件に一致しない行を削...
-
Excel VBA オートフィルタの結...
-
エクセルのVBAで指定した行数の...
-
VBAで保存しないで閉じると空の...
-
WPSOffice_マクロの有効化について
-
エクセル関数>参照ファイル名...
-
Excel マクロの編集がグレーに...
-
Excelのマクロでボタンを押すと...
-
エクセル;相対パスを絶対パスへ...
-
エクセルの表を複数枚印刷した...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで空白行を削除する ...
-
数値に見えるものはすべて数値...
-
エクセルのデータがない行には...
-
マクロで最終行を取得してコピ...
-
【VBA】条件に一致しない行を削...
-
【VBA】条件に一致しない行を削...
-
エクセルのVBAで指定した行数の...
-
VB.net
-
Excel VBAでオートフィルタで抽...
-
マクロにて指定の文字間の文字...
-
Excel97 指定した行だけマク...
-
EXCEL VBAでA列にある空白行よ...
-
excel2021で実行できないマクロ...
-
Excel 別ブックから該当データ...
-
VBAでの重複データに色付け
-
Excel VBA オートフィルタの結...
-
エクセルで階層図を作る方法
-
VBAで特定の行と一つ上の行を削...
-
【至急】Excel 同一人物の情報...
-
Excelで、マウスで範囲を選択し...
おすすめ情報
行は1048576行って決まっているんですか?
知りませんでした!
最終行1048576を指定しないやり方もあるのでしょうか。。「一番下まで」という指示の仕方もありますか?