如何清除单元格/范围内容？

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

可能使用for next循环对行进行迭代，并删除整个行，如下所示：

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

或删除所需范围内的所有行，如下所示：

Rows("2:" & lastrow).delete

Answer 2

在指定范围内被遗忘的列

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