データのない不要な行を削除するマクロ

空白行・不要な行を削除する

マクロ講座

データのない不要な行を削除するマクロ

マクロ講座21回目は、データのない不要な行を削除するマクロ（空白行を削除するマクロ）です。
（サンプルファイルは、こちらから マクロ講座21回サンプルデータ）

今日は、データのない不要な行を削除するマクロを作成します。

大きな表で、追加したり削除したりを繰り返しているうちに、
データのない空白の行が、ところどころにできてしまった場合、
1行ごとに削除していもいいのですが、大量にあると、けっこう大変な作業になります。

そのようなことが頻繁にあるのなら、時間の節約のために、
データのない行を削除し、行を詰めるマクロを作成してみましょう。

マクロの記録を実行する。

さあ、今日もおきまりの実習です。

EntireRow Delete を使います

データのない空白の行が、ところどころにできてしまった表です。マクロの記録を開始します。

マクロに空白行詰めという名前を付けています。OKをクリックして、F5キーを押します。

ジャンプダイアログが現れるので、セル選択をクリック。
続いて表示される、選択オプションから空白セルにチェックをいれます。

OKをクリックすると、ダイアログが閉じ、表の空白セルがすべて選択されています。そこで、右クリックから削除を選択します。

表示される削除ダイアログから、 上方向にシフトまたは、行全体にチェックをいれます。これは元の表の種類によって、どちらか都合の良い方を選んでください。OKをクリック。

すべての空白行が削除されています。
マクロの記録を終了します。

こちらは同様にして記録した上方向に（U）シフトの場合のコード。

さあ、コードを見てみましょう。