清除列數據

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 

會工作得很好。