Gruppe
Ereignis
Problem
Bei Auswahl eines Wertes in Zelle C6 soll zu verschiedenen Makros verzweigt werden.
ClassModule: Tabelle1
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$C$6" Then Exit Sub
Run Target.Value
End Sub
StandardModule: Modul1
Sub A()
MsgBox "Ich bin Makro A"
End Sub
Sub B()
MsgBox "Ich bin Makro B"
End Sub
Sub C()
MsgBox "Ich bin Makro C"
End Sub
Sub D()
MsgBox "Ich bin Makro D"
End Sub