Worksheet Events

Hi,

need help, multiple Worsheet_Change events it works just once time then does nothing,
this is the code i have now...

Private Sub Worksheet_Change(ByVal Target As Range)
    Application.ScreenUpdating = False
    Application.EnableEvents = False
    If Not Intersect(Target, Me.Range("V1")) Is Nothing Then
    Call Macro1
    End If
    If Not Intersect(Target, Me.Range("J2:J101")) Is Nothing Then
    Call Macro2
    Application.EnableEvents = True
    End If
    Application.ScreenUpdating = True

End Sub