Vba dropdown event

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

Source: sebastianviereck.de

Similar codes

1 vote131 views1 answer
Excel vba force recalculation
VBA
2 votes128 views1 answer
Vba ado ace sql alias ignored for calculated column
VBA
0 vote133 views2 answers
Vb.net include quotes in string
VBA
0 vote119 views1 answer
Type excel.application is not defined vb
VBA
0 vote131 views1 answer
Add text to combobox drop down vb
VBA
0 vote151 views1 answer
Excel vba protect shapes
VBA
5 votes146 views2 answers
Excel vba write to the windows registry
VBA
0 vote159 views2 answers
VB
VBA
0 vote127 views1 answer
Vba parameter adodb null value
VBA
0 vote171 views1 answer
Excel vba delete columns in range
VBA