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

4 votes214 views1 answer
Excel vba determine number of elements in an array
VBA
0 vote220 views1 answer
Enable macros on opening workbook vba
VBA
0 vote218 views1 answer
Refresh token em vb net
VBA
0 vote263 views1 answer
Excel vba protect sheet
VBA
4 votes223 views1 answer
Excel vba how to reset usedrange
VBA
0 vote238 views1 answer
Method showalldata of object _worksheet failed vba
VBA
0 vote236 views1 answer
Default host vbox address
VBA
-1 vote253 views1 answer
How save excel through visual basic
VBA
0 vote221 views1 answer
Excel vba hide gridlines
VBA
8 votes237 views1 answer
Run command pormpt in background windows
VBA