SelectionChange stops working
Hi Andym,
It is possible that the code is turning of events with the line:
Application.EnableEvents = False
If the code fails, the corresponding re-activation of events is not taking
place.
Therefore, try changing your code to include an error handler which restores
the setting, e.g.:
'=============
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error GoTo XIT
Application.EnableEvents = False
'your code
XIT:
Application.EnableEvents = True
End Sub
'<<=============
Immediately, however, restore the setting by typing:
Application.EnableEvents = True
in the Immediate window and hitting the Enter key.
---
Regards,
Norman
"andym" wrote in message
ups.com...
Dear All,
I am testing some SelectionChange event code. Each time it doesn't like
like what I test it with it refuses to trigger the event again. My only
solution to get it working again is to save the file, close the
workbook, and close Excel.
I then have restart Excel and reopen the file to try it again. Is there
some 'reset' trick that saves me from having to go out of the
application altogether so I continue on?
Many thanks,
andym
|