如何清除cell/range内容？

Question

这是我的代码，

Sub Clear_click()
    Dim lastrow As Long
    lastrow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
    Range("A2" & lastrow).ClearContents
End Sub

由于Excel有很多行，我如何从清除第二行的内容开始让我们说例如（A2）到最后一行数据。最后一行数据可以在任何地方。

Answer 1

指定范围内的遗忘列

Range("A2:A" & lastrow).ClearContents

Answer 2

可能使用 for next 循环迭代行并像这样删除整行：

For i = 2 To lastrow
    Rows(i).EntireRow.Delete
Next i

或像这样删除所需范围内的所有行：

Rows("2:" & lastrow).delete

如何清除cell/range内容？

How to clear cell/range contents?

excel

vba