上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