ich steuere die Zelle A1 per Optionsfeld an. Dadurch werden dort Ziffern von 1 - 3 erzeugt.
Nun möchte ich in Abhängigkeit vom Wert ein dazugehöriges Makro (als Beispiel eine Msgbox) ablaufen lassen.
Mein nachfolgender Code funktioniert aber nicht.
Was mache ich falsch?
Private Sub Worksheet_Change(ByVal Target As Range)
'Ansteuern der Zelle A1 per Optionsfelder
If Range("A1").Value = 1 Then
MsgBox "1"
End If
If Range("A1").Value = 2 Then
MsgBox "2"
End If
If Range("A1").Value = 3 Then
MsgBox "3"
End If
End Sub
Danke vorab!
Dietmar aus Aachen