Hello, I am trying to call macros based on the number in one cell but only the change for numbers 1 & 2 seem to work:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Cells.Count > 1 Then Exit Sub
If IsNumeric(Target) And Target.Address = "$D$27" Then
Select Case Target.Value
Case 1: Call Macro1
Case 2: Call Maco2
Case 3: Call Macro3
Case 4: Call Macro4
Case 5: Call Macro5
End Select
End If
End Sub
Any help would be apreciated, thanks
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Cells.Count > 1 Then Exit Sub
If IsNumeric(Target) And Target.Address = "$D$27" Then
Select Case Target.Value
Case 1: Call Macro1
Case 2: Call Maco2
Case 3: Call Macro3
Case 4: Call Macro4
Case 5: Call Macro5
End Select
End If
End Sub
Any help would be apreciated, thanks