VBAの質問としてお受けします。 >ステートメントが分かる方が要らしたら教えてください まず、最初に、VBAでは、ステートメントというのは別の意味です。 >しかし、マウスやキーに依るメニューでは「空白行の削除」と言うのが有りません。 マウスのメニューに加えるということでしょうか? 以下は、その行の全てのセルが空白の場合にのみ、削除されます。 '標準モジュールへ Sub BlankRowsDelete() Dim Rng As Range Dim i As Long Set Rng = Selection '最初にマウスで範囲を選択 For i = Rng.Rows.Count To 1 Step -1 With Rng.Cells(i, 1) If Application.CountA(.EntireRow) = 0 Then .EntireRow.Delete End If End Wi