ich möchte, wenn ich Tabelle1 wähle, dass Kontextmenue automatisch ausblenden lassen. Weiß jemand einen entsprechenden Code?
Gruß
Karsten
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Application.CommandBars("Cell").Enabled = Sh.Name "Tabelle1"
End Sub