VBA常用技巧代码解析

lmj4997

非常感谢楼主，~正在学习中

碧螺春

太感谢楼主了

Ritchie

为什么分流下载的最后一个文件总是无法下载？HELP

ethan.t-mac

感谢楼主！！让大家觉得中国还是有善良的人的。

yuanzhuping

技巧192         防止用户中断代码运行
       在使用VBA开发的程序交予用户使用后，如果在运行需要长时间执行的宏代码时，用户在代码运行期间按下了<Esc>键或者<Ctrl+Break>组合键，会显示如图所示的消息框。
      
       此时单击“继续”按钮将继续执行代码，单击“结束”按钮结束过程，单击“调试”按钮进入中断模式，这显然不是用户所希望出现的，此时需要使用Application对象的EnableCancelKey属性来进行控制，如下面的代码所示。

1. #001  Sub EnablEsc()
   
2. #002      Dim i As Integer
   
3. #003      Application.EnableCancelKey = xlDisabled
   
4. #004      For i = 1 To 2000
   
5. #005          Cells(1, 1) = i
   
6. #006      Next
   
7. #007  End Sub

复制代码

代码解析：
       EnablEsc过程在代码运行期间禁用“取消”键的捕获功能。
       应用于Application对象的EnableCancelKey属性控制将用户中断用于运行程序的处理，语法如下：
       expression.EnableCancelKey
       参数是expression必需的，Application对象。
       EnableCancelKey属性值为表格所示的XlEnableCancelKey常量之一。
      
       只要Microsoft Excel返回空闲状态并且没有程序处于运行状态，EnableCancelKey属性都会重置为xlInterrupt。若要在程序运行中捕获或者禁用取消过程，则每次在程序被调用时必须明确更改EnableCancelKey属性。

huchuanxing

谢谢你的奉献！

ykx042907

袁版主：您好！
   您是说“VBA常用技巧代码解析”贴一共只有200个技巧吗？不会吧？不是还有很多实例的吗？谢谢！

wangliwu0955

谢谢 学习下

joe_xgp

由于比较忙，一段实际没上来，第10章已经出来了， 真佩服袁版主的毅力和无私奉献的精神！ 感激！

Fae

楼主真是太伟大了！向楼主致敬！

谢谢楼主，一直在学习中！