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 vote191 views1 answer
Excel vba cell on change
VBA
0 vote188 views1 answer
Supprimer la valeur de celule vba
VBA
-1 vote189 views1 answer
Vba code to add new column in table
VBA
0 vote194 views1 answer
Open file dialog in vb.net
VBA
0 vote215 views2 answers
S yyyy-MM-dd em vb net
VBA
0 vote192 views1 answer
Pivot data source not accepting table named range vba
VBA
0 vote200 views1 answer
Set datetimepicker value to null vb
VBA
8 votes204 views1 answer
Excel vba determine number of elements in a 1D array
VBA
0 vote135 views1 answer
Vba code to remove leading and trailing spaces
VBA
3 votes202 views1 answer
Excel vba get the workbook full filename with path
VBA