删除多个列会返回错误

我想使用下面的代码删除多个列：

Dim fileSheet as Worksheet Set fileSheet = wb.ActiveSheet fileSheet.Range("D:F, J:M, P:R, T:V, Z:AE,AG").EntireColumn.Delete 

当我在删除列时，它返回Method 'Range' of object'_Worksheet' failed错误的Method 'Range' of object'_Worksheet' failed 。 我不想逐列删除，因为执行代码需要时间。 任何人都知道我有什么错误的命令？

Answer 1

这是否纠正错误？对不起，我是从手机，所以我不能testing或现在重现。

 fileSheet.Range("D:F, J:M, P:R, T:V, Z:AE,AG:AG").EntireColumn.Delete