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 vote346 views1 answer
Vba len variant
VBA
0 vote367 views1 answer
How to add line graph vb net
VBA
0 vote334 views1 answer
How to use VBA to add new record in MS Access?
VBA
1 vote379 views2 answers
Vba string length
VBA
1 vote354 views1 answer
Vba refresh pivot table
VBA
0 vote335 views1 answer
Vb net dgv doesn't keep currency format
VBA
0 vote387 views1 answer
Vba count all row
VBA
0 vote325 views1 answer
Vb.net round to 2 decimal places
VBA
-1 vote384 views1 answer
VBA check if a cell contains a letter or string
VBA
0 vote403 views1 answer
Vbs run with cscript
VBA