Kontextmenü ausblenden

ich möchte die rechte Maustaste als "Umschalter" für einen Zellwert benutzen. Das funktioniert auch (siehe unten). Allerdings erscheint danach das Kontextmenü.
Wie kann ich das verhindern? Hab es schon mit unload probiert, weiß aber nicht wie ich es ansprechen soll.

Gruß
Matthias

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
If Target.Value = "x" Then
Target.Value = ""
Else
Target.Value = "x"
End If
End Sub