![Excel VBA活用范例实用手册(畅销升级版)](https://wfqqreader-1252317822.image.myqcloud.com/cover/878/26178878/b_26178878.jpg)
上QQ阅读APP看书,第一时间看更新
032 使取消键无效
EnableCancelKey属性
使取消键(【Esc】等键)无效,可以防止用户通过按【Ctrl+Break】组合键或【Esc】键的方式强行中断宏的运行。但需要注意的是,当设置取消键无效后,会无法从无穷循环中退出。
使取消键无效的方法是设置Application对象的EnableCancelKey属性,该属性值有以下3种情况:
◆xlDisabled:完全禁用取消键捕获功能。
◆xlErrorHandler:将中断作为错误信号传递给运行程序,由On Error GoTo语句设置的错误处理程序捕获。可捕获的错误代码为18。
◆xlInterrupt:中断当前运行程序,用户可进行调试或结束程序的运行。
下面的程序先将EnableCancelKey属性设置为xlDisabled,即完全禁用取消键捕获功能,用户无法通过【Ctrl+Break】组合键强行终止循环;然后再将EnableCancelKey属性设置为xlErrorHandler。
第1章\范例1-032.xlsm
![](https://epubservercos.yuewen.com/BB8EB9/14615854705701106/epubprivate/OEBPS/Images/img00055002.jpg?sign=1739668999-Pd6zcaMkRAkFsOZMnbM44XqI5ny7vvFY-0-5cccb2795de492f3760fa35529010048)
![](https://epubservercos.yuewen.com/BB8EB9/14615854705701106/epubprivate/OEBPS/Images/img00056001.jpg?sign=1739668999-bzVKh82hs3AdexP24SbRhl4sOcPTSCpJ-0-46a78f2872424f0d36ee34f55c278480)