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 vote211 views1 answer
(SecurityProtocolType)3072 vb.net
VBA
0 vote205 views1 answer
Vba test optional argument
VBA
5 votes227 views2 answers
Excel vba write to the windows registry
VBA
2 votes150 views2 answers
Vba exit loop
VBA
18 votes378 views3 answers
Excel-vba make integer
VBA
5 votes232 views1 answer
Excel vba last byte from INTEGER
VBA
0 vote229 views1 answer
Vba code for cutoff time
VBA
0 vote225 views1 answer
Get month number from month name vbnet
VBA
0 vote240 views1 answer
Check if cell is dbnullvb.net
VBA
31 votes455 views1 answer
Excel-vba how to convert a column number into an excel column
VBA