2013-07-26 268 views
3

我认为这是一个简单的解决方案,但我一直在这个麻烦点停留了好几个小时。VBA检查按钮是否被点击

基本上在Excel工作表中,我有两个按钮分配给宏:1和2.如果用户先点击1,然后点击,然后点击2,2从一些变量1运行。但我需要2如果先点击2,就能独立操作。因此,我需要在2代码中询问是否有1个按钮被点击。

1和2都是公共潜水艇。我认为我缺少这些定义,但我不确定。

简单示例:

Public Sub 1() 
do this 
End Sub 

Public Sub 2() 
If 1 clicked then 
    process a 
Else 
    process b 
End if 
End Sub 

回答

4

设置一个公共布尔和使用

例如

Dim ButtonOneClick As Boolean 'Make sure this is before all subs 

Sub Button1_Click() 
ButtonOneClick = True 
End Sub 

Sub Button2_Click() 
If ButtonOneClick Then 
    MsgBox "Button 1 Was Clicked" 
Else 
    MsgBox "Button 1 Was NOT Clicked" 
End If 

ButtonOneClick = False 
End Sub 
+0

真棒!这是完美的。非常感谢! – user2623046

相关问题