Select 整列

Select entire columns

我激活了一个范围 Range(strPlageSélectionnée).Activate,我正在寻找 select 整个列以便删除它们。 我知道 select 一列有一个特定的公式 ActiveCell.EntireColumn.Select 要删除一列,它是 ActiveCell.EntireColumn.Delete

但是我如何 select 一次删除许多列。有没有具体的公式?

感谢您的帮助

您可以将 ActiveCell 替换为范围。

Range("C4:F10").EntireColumn.Delete

不要 select 列来删除它们,事实上,您应该很少 select 以编程方式执行任何操作。

我怀疑你的列不是彼此相邻的,所以这行得通。

Range("C:C,F:F,I:I").Delete

注意 .select 和 selection 被截断,代码合并为一行而不是:

Range("C:C,F:F,I:I").select
Selection.Delete