VBA code just stopped working...

[yoko]

I just added the code...

If Target.Address = "$A$1" Then
    Application.EnableEvents = False
    If Target.Value = 1 Then
         Range("A1").Value = "Hello world"
    Else
       Range("F10").Value = ""
    End If
    Application.EnableEvents = True
End If

Before lunch it worked fine. Now I've come back and it wont work I put a 1 in cell A1 and nothing happens. If I record a macro and run it, it works, but the macro above just wont work even though an hour ago it worked fine. I've not changed what I type in and macros are enabled.

Its very frustrating!! lol

Any ideas?

Cheers.

 

[Norie]

yoko

It could be that at some point you disabled events and didn't enable them again.

Goto the VBE (ALT+F11) and enter this in the Immediate Window (CTRL+G) and press enter.

Application.EnableEvents = True

 

[Joe4]

I am betting that the code probably got interrupted along the way, so EnableEvents was turned off and not turned back on.

Run this code to turn it back on, then test again:

Sub MyTurnEventsOn()
    Application.EnableEvents = True 
End Sub

 

[yoko]

Ah fantastic! Thanks a lot