EnableEvents doesn't work
This isn't an event to excel. So you have to take care of it yourself.
Are these controls from the control toolbox toolbar placed on a worksheet?
If you're calling the _click event from a procedure in a general module, you can
use:
Option Explicit
Public blkproc As Boolean
Sub testme()
blkproc = True
Sheet1.CheckBox1.Value = False
blkproc = False
End Sub
Then in the worksheet module:
Option Explicit
Private Sub CheckBox1_Change()
If blkproc = True Then Exit Sub
MsgBox "Change"
End Sub
Private Sub CheckBox1_Click()
If blkproc = True Then Exit Sub
MsgBox "Click"
End Sub
(I usually use _change.)
Stefi wrote:
Hi All,
I have a checkbox with a CheckBox_Click event. In some cases I want to
change the value of its linked cell (to FALSE) through VBA, and in these
cases I don't want to run CheckBox_Click event code. I set
Application.EnableEvents to FALSE before changing the linked cell value, but
event code is still executed. How can I avoid it?
Thanks,
Stefi
--
Dave Peterson
|