如何删除Excel VBA中的多个列？

如何删除Excel VBA中的多个列？ 我试过了：

Sub DelColumns() Dim col As Range For Each col In Range("A:C,E:E,H:S,U:AK,AM:AM,AO:AU,BC:BI,BK:BV").Columns col.EntireColumn.Delete Next col End Sub 

更新。 我试图在一个表是一个数据透视表的显示详细信息表。 是否有可能删除表列而无需先将表格转换为范围？

Answer 1

您可以对Range使用删除方法来删除列。

在你的情况下，

 Sub DelColumns() Range("A:C,E:E,H:S,U:AK,AM:AM,AO:AU,BC:BI,BK:BV").Delete End Sub