View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Norman Jones Norman Jones is offline
external usenet poster
 
Posts: 5,302
Default 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