作者：绿色风
分类：
时间：2022-08-17
浏览：92
楼主
水星钓鱼 |
Q：Application对象的EnableEvents属性的设置对用户窗体及其控件的事件有效吗？
A：通过设置Application.EnableEvents=False可以避免一些事件的连锁反应，如更改单元格内容时会触发Worksheet_Change 事件，如果这个事件下的代码又使目标单元格的值发生了更改则又会触发Worksheet_Change 事件，所以可以通过添加设置Application.EnableEvents=False来限制触发连锁事件，但是这个设置对用户窗体及其控件的事件是无效的。
举例如下:
在VBE中插入用户窗体(userform1)，然后在窗体上插入文本框（textbox1)，最后输入以下代码- Private Sub TextBox1_Change()
- Static i
- Application.EnableEvents = False
- i = i + 1
- UserForm1.TextBox1.Text = i
- Application.EnableEvents = True
- End Sub
运行窗体，往文本框中输入内容，如果Application.EnableEvents的设置有效，那么每次修改文本框的内容，文本框的最终显示值是递增1的。但是事实是修改文本框的内容时文本框的显示值不断地累加1。
附件如下：
 Application对象的EnableEvents属性的设置对用户窗体及其控件的事件无效.rar
|
2楼
omnw |
早看到这个帖子就好了，我是通过实践才知道这个语句不适用于窗体，印象深刻深刻啊！ |
免责声明
有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，
经与ExcelTip.Net站长Apolloh商议并征得其同意，
现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，
供有需要的人士查询使用，也慰缅曾经的论坛时代。
所示各个帖子的原作者如对版权有异议，
可与本人沟通提出，或于本站点留言，我们会尽快处理。
在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一