Gruppe
Ereignis
Problem
Wie kann ich bei XL8 in Abhängigkeit vom Zellwert der Eingabezelle ein bestimmtes Makro aufrufen?
ClassModule: Tabelle1
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address <> "$A$1" Then Exit Sub
If IsNumeric(Target) = False Then Exit Sub
Select Case Target
Case 1: Call Macro1
Case 2: Call Macro2
End Select
End Sub
Sub Macro1()
MsgBox "Ich bin Makro1"
End Sub
Sub Macro2()
MsgBox "Ich bin Makro2"
End Sub