在Excel中使用VBA時，如何清除特定列上的所有內容？

Question

我有這個清理過去的特定行的所有內容，但我希望它能夠使用列而不是行。 X在這種情況下應該是6

With Sheets("Sheet1") 
     .Rows(X & ":" & .Rows.Count).ClearContents 
    End With 

Answer 1

With Sheets("Sheet1") 
     .Range(.Cells(1,X).Address & ":" & .Cells(1,.Columns.Count).Address).Columns.ClearContents 
End With 

其中X是要啓動與列的數字或字母。