VBA检查是否已单击按钮

时间:2013-07-26 14:25:48

标签: vba button click

我认为这是一个简单的解决办法,但我现在已经在这个麻烦地点呆了好几个小时了。

基本上在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

1 个答案:

答案 0 :(得分:6)

设置一个公共布尔值并使用

例如

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