Msgbox: nur Cancel als option

Private Sub CommandButton3_Click(ByVal Cancel As MSForms.ReturnBoolean)

On error goto Err_entfernen
...
...

Err_entfernen
MsgBox "Sie müssen die zu entfernende Zuordnung auswählen!"
Cancel = True
exit sub

Die fehlermeldung lautet: "Deklaration der Prozedur entspricht nicht der Beschreibung eines Ereignisses oder einer Prozedur mit demselben Namen"

Danke für jede Hilfe