Question

vba 用按钮终止 或者 暂停其他 正在运行的宏

Private Sub CommandButton1_Click()
For i = 1 To 100000
DoEvents
TextBox1.Value = i
Next
End Sub
按钮1里在运行这个东西，
我想让按钮2 ，实现暂停功能 ， 那么
Private Sub CommandButton2_Click()
这里要怎么写

Answer 1

你想多了，按钮1执行期间，一般情况下，按钮2根本就无法按。
即使能按（在按钮1里面不断调用DoEvents），按钮2也无法暂停、终止按钮1的任务，他们是独立的。
一般这样思考解决问题：
按钮2（们）修改一些全局变量的值，按钮1主动的、不断去检测那些全局变量的值，自己根据全局变量数值采取一些措施，当然按钮1要主动的、不断的执行DoEvents，否则按钮2按不下去。