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

3 votes184 views1 answer
Vba http request json
VBA
0 vote187 views1 answer
Vba table header name
VBA
0 vote188 views1 answer
Vbs run with cscript
VBA
1 vote171 views1 answer
Excel vba make cell visible
VBA
20 votes342 views1 answer
Excel vba recursive example factorial function
VBA
1 vote186 views1 answer
How to remove zeros in excel
VBA
0 vote179 views2 answers
How to update date and time automatically once id is entered in excel vba
VBA
0 vote184 views1 answer
Vba array of integers
VBA
5 votes188 views1 answer
Excel vba highlight cells using the hex color value within the cells
VBA
0 vote164 views1 answer
Excel vba populate array with cell values
VBA