标题：关于VBS的EXCEL操作

1楼

sdhookling 发表于：2017/12/9 22:29:26

请问，VB中删除一个excel空列的代码如下：

Sub DeleteEmptyColumns()

Dim LastColumn As Long, c As Long

LastColumn = ActiveSheet.UsedRange.Columns.Count

LastColumn = LastColumn + ActiveSheet.UsedRange.Column

For c = LastColumn To 1 Step -1

If WorksheetFunction.CountA(Columns(c)) = 0 Then Columns(c).Delete

Next c

End Sub

怎么改写到VBS里面，能帮忙改一下吗，WorksheetFunction.CountA(Columns(c)) = 0这句判断出错，谢谢

共1 条记录, 每页显示 10 条, 页签: [1]