cfnr.net
当前位置:首页 >> vBA强制停止运行 >>

vBA强制停止运行

如果按Esc键无法中止,就只能启动任务管理器结束进程了

运行VBA程序的电脑都比较卡,按一次ESC可能没有反应,最好是一直按住ESC,直到程序中止

Sub s() n = MsgBox("是否继续?", vbYesNo) If n = vbNo Then Exit Sub [A8] = "圣诞节"End Sub

强制停止ctrl+break

首先vba是单线程的,你这个click过程如果是有for循环的话可以在循环中加一个doevents,然后在定义一个公共布尔变量并放在循环里用if判断,如果在新按钮中设置公共变量为true则用exit sub退出click过程

直接在msgbox后面使用end语句,比如 if a= 1 then msgbox “错误退出” end end if

on error GOTO A A:msgbox() 在调用的前面on error GOTO A 在SUB结束前面 A:msgbox()‘提示 end'结束程序 end sub ================= 你直接吧A放到你程序的结束地方不就好了

你想多了,按钮1执行期间,一般情况下,按钮2根本就无法按。 即使能按(在按钮1里面不断调用DoEvents),按钮2也无法暂停、终止按钮1的任务,他们是独立的。 一般这样思考解决问题: 按钮2(们)修改一些全局变量的值,按钮1主动的、不断去检测...

If MsgBox("确定删除?", vbOKCancel + vbQuestion) = vbOK then Range("D19:D28").ClearContents end if

利用禁用屏幕刷新即可,即在程序开头加上一句代码:Application.ScreenUpdating=False程序结尾前加上Application.ScreenUpdating=True关于此例中用到的ScreenUpdating属性的相关知识:如果屏幕更新功能是打开的,则该值为True。Boolean类型,可...

网站首页 | 网站地图
All rights reserved Powered by www.cfnr.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com