Worksheet Events Not Working Consistenly

[incjourn]

All,

I have been working with Worksheet_SelectionChange and Worksheet_Change events. They start of working and then they stop, sometimes after a de-bug and sometime after a change on the worksheet. If I save and close the workbook and open it again it is fine. Can anybody tell me what is happening and suggest a fix?

An example of my code...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

On Error Goto Error Handler

NmRng = Target.Name.Name
 Application.EnableEvents = False
        
        If Left(NmRng, 3) = "INP" Then
            NmVal = Target.Value
            NewVal = InputBox("Enter New Value", "Updtate Parameter) 
        End If
        
ErrorHandler:
        Application.EnableEvents = True
End Sub

[mudraker]

Did you copy & paste the code into your posting or type it in

Your posted code has a couple of errors init that will cause it to error & not run at all

On Error Goto Error Handler

should be

On Error Goto ErrorHandler

NewVal = InputBox("Enter New Value", "Updtate Parameter)

should be probally be

NewVal = InputBox("Enter New Value", "Update Parameter")

Not shure what you are trying to do with using Name twice

NmRng = Target.Name.Name

[royUK]

You also need to add On Error GoTo 0 at the end to return error handling to Excel

[romperstomper]

If you Debug and press Stop, your code will not run to the end and events will be disabled. Restarting Excel will reset that.
You would only use On Error Goto 0 if you wanted to disable all error handlers, which is presumably not the case here.

[incjourn]

Thaks that's helpful.
Is there any other way to reset the events without closing and opening the workbook?

[romperstomper]

Yeah you can just type:

Application.EnableEvents = True

in the Immediate Window and press enter. I have two one-line subs for turning events on and off when I'm debugging.