P
Pats
Can anyone tell me why this code is not displaying my UserForm?
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("D7:Y7000")) Is Nothing Then
UserForm2.Show
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("D7:Y7000")) Is Nothing Then
UserForm2.Show
End If
End Sub