按下按钮1时按其他按钮2 EXCEL VBA
问题描述:
我有3个切换按钮,如Excel VBA中所示。首先我按连续然后它将被按下并开始运行宏。在此期间,如果我需要按紧急按钮我需要做的:按下按钮1时按其他按钮2 EXCEL VBA
第一步:关闭连拍按钮
第二步:打开紧急按钮 (手动是无关紧要这里)
目前当我试图做到这一点时,紧急停止不能按下,直到连续的宏结束。
答
我大部分时间都在使用这个功能,当我试着说,从网上抓取数据。
Option Explicit
Dim boolStop As Boolean
'~~> Continuous button
Private Sub CommandButton1_Click()
CommandButton1.Enabled = False
boolStop = False
For i = 1 To 1000000000
For j = 1 To 1000000000
Debug.Print i
DoEvents
If boolStop = True Then
Msgbox "Operation Paused by the User"
CommandButton1.Enabled = True
Exit Sub
End If
Next j
Next i
End Sub
'~~> Emergency button
Private Sub CommandButton3_Click()
boolStop = True
End Sub
+0
ohhhh我明白了OP的意思,你100%正确! +1 – 2013-12-12 14:33:11
我可以在Visual Studio中使用Visual Basic并链接Excel-vba代码吗? –
是的,有可能..一刻 –