Hallo Adde,
füge das folgende Makro in das VBA-Projekt der entsprechenden Tabelle ein:
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True 'keine Auswahl bei Rechtsklick zeigen
Target.Offset(2, 0).Clear
End Sub
Aber Achtung! Das wirkt in der ganzen Tabelle. Gibt es bereits ein Before-Right-Click-Makro in deiner Tabelle, musst du das entsprechend ergänzen.
Falls das Makro nur in bestimmten Zellen, Zeilen oder Spalten gelten soll, so muss das noch entsprechend eingeschränkt werden:
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
'Nur ausführen in den Zellen A1 bis E1
If Not Intersect(Target, Range("A1:E1")) Is Nothing Then
Cancel = True 'keine Auswahl bei Rechtsklick anzeigen
Target.Offset(2, 0).Clear 'Zelle zwei Zeilen darunter löschen
End If
End Sub
Gruß
M.O.