删除空白处后面的行中的所有单元格

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.