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

2 votes282 views1 answer
Vba round number
VBA
25 votes552 views3 answers
String to date vb
VBA
0 vote235 views1 answer
Vba variable number of arguments
VBA
5 votes251 views1 answer
Excel vba how to unit test vba code
VBA
0 vote229 views1 answer
Dynamically change drop down list visual basic
VBA
0 vote224 views1 answer
Vba boolean to string
VBA
0 vote220 views1 answer
Refer to resource using string variable vb.net
VBA
1 vote230 views2 answers
Vba string length
VBA
0 vote223 views1 answer
Remove last 8 characters from string vb
VBA
1 vote218 views1 answer
Excel vba make cell visible
VBA