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

0 vote286 views1 answer
Compare dates vb
VBA
0 vote278 views1 answer
Vba argument is set
VBA
0 vote306 views1 answer
Group controls programmatically vb
VBA
0 vote281 views1 answer
Vba add month to date
VBA
0 vote309 views1 answer
Excel last used row
VBA
3 votes301 views2 answers
Vba active workbook path
VBA
0 vote309 views1 answer
Test if form is open vb
VBA
0 vote299 views1 answer
Excel vba ternary
VBA
0 vote301 views1 answer
Vba range clear formatting
VBA
0 vote278 views1 answer
Open application from vbnet
VBA