PR

【ExcelVBA】行を削除する方法(複数行範囲・最終行まで)

エクセルVBAで行を削除する方法-アイキャッチ 行・列の操作

VBAでエクセルシートの行を削除する方法について説明します。

スポンサーリンク

行を削除する方法(1行)

行の削除はRowsプロパティのDeleteメソッドを実行します。
1行のみ削除する場合はRowsのカッコ内に行数を指定します。

'3行目を削除
Rows(3).Delete

▽マクロ実行前→実行後のイメージ
 3行目のパンの行が削除されました。

エクセルVBAで行を削除する方法-1行削除した状態
スポンサーリンク

複数行を一気に削除する

複数行を削除する場合はカッコ内で何行目~何行目まで削除するのかを指定します。

'3行目~5行目を削除
Rows("3:5").Delete

▽マクロ実行前→実行後のイメージ
 3行目~5行目の行が削除されました。

エクセルVBAで行を削除する方法-複数行削除した状態
スポンサーリンク

2行目~最終行までを削除する

実務では「ヘッダーだけ残して2行目~最終行までを毎回削除する」などをよく使用します。
その場合は最終行を変数に取得して、2行目~最終行までを削除するように指定します。

'2行目~最終行までを削除
Dim LastRow As Integer

'最終行を変数に取得
LastRow = Cells(Rows.Count, 1).End(xlUp).Row

'2行目~最終行までを削除
Rows("2:" & LastRow).Delete

▽マクロ実行前→実行後のイメージ
 ヘッダーだけが残って2行目~最終行の13行目までが削除されました。

エクセルVBAで行を削除する方法-2行目~最終行まで削除した状態
スポンサーリンク

関連記事(行・列操作まとめ)

こちらの記事では行と列の操作をまとめています。よかったらこちらもご覧ください。

スポンサーリンク

※コードのコピー利用について

・コードのコピーは自由におこなっていただけます。
・気を付けて作成はしていますがコードには誤りがある可能性があります。
・自身の環境で動作確認をしていますが、すべての方の環境で同様に動くことは保証できません。
・データの破損等の責任は負いかねますのでご自身の責任のもとお使いください。
・記事の内容は適宜変更することがありますのでご了承ください。

タイトルとURLをコピーしました