将VBA范围命令与其他图纸中的ActiveX按钮一起使用
在建立用户界面时,我使用VBA2010中的ActiveX按钮。我首先编写宏,检查它们,然后将它们复制到ActiceX按钮代码中 然后,宏在另一个工作表的范围命令下崩溃。为了测试它,我分离了以下命令:将VBA范围命令与其他图纸中的ActiveX按钮一起使用,vba,range,activex,Vba,Range,Activex,在建立用户界面时,我使用VBA2010中的ActiveX按钮。我首先编写宏,检查它们,然后将它们复制到ActiceX按钮代码中 然后,宏在另一个工作表的范围命令下崩溃。为了测试它,我分离了以下命令: Sheets("Data").Visible = xlSheetVisible Sheets("Data").Select Columns("O:O").Select ' The code crashes here 结果我得到一个1004运行
Sheets("Data").Visible = xlSheetVisible
Sheets("Data").Select
Columns("O:O").Select ' The code crashes here
结果我得到一个1004运行时错误。
我发现了一个类似的话题,似乎也没有解决
非常感谢你的帮助。
提前谢谢 不建议选择。请将代码修改为
Dim ws As Worksheet
Set ws = Sheets("Data")
ws.Visible = xlSheetVisible
ws.Select
With ws
.Columns("O:O").Select
End With
如果回答了您的问题,请单击复选标记。我们将这样做。谢谢:)