在Excel中使用VBA，如何清除特定列之后的所有内容？

Question

我有这个用于清除特定行的所有内容，但我希望它可以使用列而不是行。在这种情况下，X应为6

session.query(literal('foo').label('bar'), Company.name)

Answer 1

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

其中X是您希望开始的列号或字母。