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 vote128 views1 answer
Vba min
VBA
0 vote128 views1 answer
Menus act like radio buttons vb.net
VBA
0 vote126 views1 answer
Excel text to columns line break
VBA
0 vote122 views1 answer
Vbnet chart make 0 gridline line different color
VBA
0 vote138 views1 answer
Vba range clear formatting
VBA
0 vote125 views1 answer
Find control with name vb
VBA
0 vote120 views1 answer
Vbnet dynamically change excel sheet name
VBA
6 votes123 views1 answer
Excel vba get the path of current workbook
VBA
0 vote146 views1 answer
Vba ternary
VBA
1 vote122 views2 answers
Vba function return array
VBA