Excel VBA - mehrere Worksheet_change_Ereignisse auf einem Tabellenblatt?

[Excelmania]

Hallo.

Ist es möglich mehrere unterschiedliche Worksheet_change-Ereignisse auf einem Tabellenblatt zu definieren?

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("D21") = "Test" Then MsgBox ("Test")
If Range("D25") = "Test" Then MsgBox ("Test")
If Range("D26") = "Test" Then MsgBox ("Test")
End Sub

Ergänzung (4. August 2021)

erledigt

 

[Janush]

Wie hast du es gemacht? Ich würde ein select case Konstrukt vorschlagen.

Private Sub Worksheet_Change(ByVal Target As Range)

    Select Case Target.Address
        Case "$D$21":
            MsgBox "D21"
        Case "$D2$5":
            MsgBox "D25"
        Case "$D$26":
            MsgBox "D26"
    End Select
   
End Sub

Gibt auch noch ein Case else, da kannst du dann gleich abbrechen lassen.