第4页(名称1)具有一个按钮,该按钮会将用户带到带有图形Sheet3(Graph)的另一个工作表
Private Sub CommandButton1_Click()
ThisWorkbook.Sheets("Graph").Activate
End Sub
目标:在工作表4(名称1)中也具有一个按钮,也可以在另一个工作表1(基本)中单击另一个按钮,这将导致更新图形。
我知道,仅具有按钮也可以执行代码听起来比较容易,但在这种情况下不是这样。
答案 0 :(得分:2)
“其他按钮”可能看起来像这样:
Private Sub CommandButton42_Click()
'do stuff...
End Sub
将其更改为此:
Private Sub CommandButton42_Click()
DoStuff
End Sub
将DoStuff
过程放入标准模块中(请注意Public
访问修饰符):
Public Sub DoStuff()
'do stuff...
End Sub
如果您不希望将DoStuff
作为宏公开显示,请在放置Option Private Module
的位置附近的顶部添加Option Explicit
:)
然后您的按钮可以执行以下操作:
Private Sub CommandButton1_Click()
DoStuff
End Sub
请勿从用户代码中调用Click
处理程序-事件处理程序应为Private
并由事件提供程序对象调用。