空白スペースの後の行のセルをすべて削除する

Question

各行を右に移動して、空白セルがあるかどうかを確認し、ある場合はその右側にあるものをすべて削除する簡単な方法があるかどうか知りたいです。これは数式で実行できますか?

Answer 1

範囲を指定してマクロを使用するだけです:

Sub Delete()   
    Range("A1:A50").Select
    Selection.ClearContents
end sub

A1:A50空白セルの後の範囲はどこにありますか。

マクロに反対の場合は、次の方法で手動で実行できます。

1. Ctrl+G
2. Type the range in. Hit enter.
3. Then just hit the 'Delete' key.