VBA On Dropdown Change Event Aktion ausführen


Wenn man auf das Ändern eines Dropdowns oder einer Zelle/Range reagieren will und eine andere Aktion ausführen will, dann kann man dies mittels des Worksheet_Change Events und am besten mittels eines benamten Bereiches /Ranges:

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim checkTarget As Range
    Set checkTarget = Application.Intersect(Target, Range("my_named_range"))
    If checkTarget Is Nothing Then
        Debug.Print "not active range, exit"
    Else
        MsgBox "success"
    End If

End Sub