清除列数据

Question

我试图计算如何清除从A2到列结束的数据。 理论上我的代码正在工作，但只有当选择器在某个范围之外才能清除。

Sub ClearData() 

Worksheets("aa").Range("a2", 
Worksheets("aa").Range("a2").End(xlDown)).ClearContents 

End Sub 

任何想法？

Answer 1

我相信这个问题肯定已经被问及过一百万次了。我不知道'选择器'是什么意思。

Sub ClearData() 

With Worksheets("aa") 
    .Range("a2", .Range("a" & .Rows.Count).End(xlUp)).ClearContents 
End With 

End Sub 

Answer 2

Do't与数据的实际结束关注：

Sub ClearData() 

    With Worksheets("aa") 
     .Range("A2:A" & Rows.Count).ClearContents 
    End With 

End Sub 

会工作得很好。