我正在尝试从特定的工作表中删除特定的列,但我无法弄清为什么此子项给我这个错误:
编译错误:未定义子函数或函数
我有一个不同的私有子程序,我已经用相同的方式设置并调用了它,并且可以正常工作,所以我认为我的语法已关闭吗? (我在vba上的等级为零)
呼叫小组
Sub HideColumns()
...
Call Del_Col_A
...
End Sub
子
Private Sub Del_Col_A()
Sheet("Sheet7").Columns(1).EntireColumn.Delete
End Sub
答案 0 :(得分:4)
您忘记了“表格”末尾的“ s”
Private Sub Del_Col_A()
Sheets("Sheet7").Columns(1).EntireColumn.Delete
End Sub
答案 1 :(得分:3)
确保"Sheet7"
实际上是您的工作表名称,所以:
Sheets("your sheet name").Columns(1).EntireColumn.Delete
如果不是"Sheet7"