anish.ms
08-08-2022, 12:40 AM
Hi,
Could somebody please help me with the below
why the below if statement is not working?
If Target.Address <> "$D$7" Or Target.Address <> "$M$5" Or Target.Address <> "$M$6" Then Exit Sub
ShowCalendar
End Sub
Do I really need the following select statement?
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Select Case Target.Address
Case "$D$7"
ShowCalendar
Case "$M$5"
ShowCalendar
Case "$M$6"
ShowCalendar
Case Else
Exit Sub
End Select
End Sub
Could somebody please help me with the below
why the below if statement is not working?
If Target.Address <> "$D$7" Or Target.Address <> "$M$5" Or Target.Address <> "$M$6" Then Exit Sub
ShowCalendar
End Sub
Do I really need the following select statement?
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Select Case Target.Address
Case "$D$7"
ShowCalendar
Case "$M$5"
ShowCalendar
Case "$M$6"
ShowCalendar
Case Else
Exit Sub
End Select
End Sub