Worksheet_Change Event, monitoring more than one cell

[BenRichards]

Hi,

I get the error "Object required," and debug highlights the bolded line. What is wrong with this bit of code?

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("T82:AA457")) Is Nothing And ActiveSheet.Range("V80").Value = "-" Then
Application.EnableEvents = False
ActiveSheet.Range("T82:AA457").Value = ""
Application.EnableEvents = True
End If

Thanks for your help!

End Sub

 

[VoG]

That code runs without error for me.

 

[RoryA]

Maybe it's the 'Thanks for your help!' before the End Sub.

 

[BenRichards]

VoG, encouraged by your comment I moved that bit of code from within a called macro to directly underneath the:

Private Sub Worksheet_Change(ByVal Target As Range)

And it works just fine. But if I put in Call Macro1 and insert the code into such a Macro, object required. Weird, but I think I can get along with this. Thanks.

RoryA,

 

[RoryA]

Did you pass Target to the macro? If not, you would get that error.