Application.EnableEvents没法屏蔽事件

RPCode是Textbox，我想实现Textbox中的内容去掉&字符后再显示，然后获取字符继续执行其他代码，但是执行到RPCode. Text=Right(Ucase(RPCode.Text),22)还是会触发change事件，求解惑

顶

求大佬来看看

顶

屏蔽事件不是用这个application.EnableEvents的吧，它可能可以屏蔽Excel系统的其他事件。
我觉得解决方法是你设定一个公共变量bchange，当需要change时可以bchange=true，在change事件处理函数第一句设置条件
sub xxx()
If bchange then
……
已有代码
……
end if
end sub
当需要屏蔽事件时可以设置bchange=false，下次启动change事件就会调过已有那些代码，这样就实现了屏蔽的功能了。

application.EnableEvents只能屏蔽工作表和工作簿事件的，控件的事件屏不了

我给你吐槽一下，申明了那么多变量，只有最后一个是整型integer，其余全是变体型

扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！

11回复贴，共1页

<<返回vba吧

分享到:

日	一	二	三	四	五	六