Microsoft Excel

Herbers Excel/VBA-Archiv

Kontextmenue ausblenden | Herbers Excel-Forum


Betrifft: Kontextmenue ausblenden von: Karsten
Geschrieben am: 17.11.2009 14:53:17

Hallo,

ich möchte, wenn ich Tabelle1 wähle, dass Kontextmenue automatisch ausblenden lassen. Weiß jemand einen entsprechenden Code?

Gruß
Karsten

  

Betrifft: AW: Kontextmenue ausblenden von: Rudi Maintaire
Geschrieben am: 17.11.2009 15:00:09

Hallo,
in DieseArbeitsmappe:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
  Application.CommandBars("Cell").Enabled = Sh.Name <> "Tabelle1"
End Sub

Gruß
Rudi


  

Betrifft: AW: Kontextmenue ausblenden von: Karsten
Geschrieben am: 17.11.2009 15:07:42

Hallo Rudi,

danke, aber bei mir passiert nichts. Hab gespeichert, geschlossen, geöffnet und es müsste doch oben die Zeile Datei, Bearbeiten usw... weg sein.

Gruß
Karsten


  

Betrifft: AW: Kontextmenue ausblenden von: Bernd
Geschrieben am: 17.11.2009 15:26:22

hi,

dann zusatz, in Rudi's lösung einfügen

Application.CommandBars("Worksheet Menu Bar").Enabled = Sh.Name <> "Tabelle1"


gruß
robert






  

Betrifft: AW: Kontextmenue ausblenden von: Karsten
Geschrieben am: 17.11.2009 15:33:19

Hallo Bernd,

danke, jetzt klappt's.

Gruß
Karsten


Beiträge aus den Excel-Beispielen zum Thema "Kontextmenue ausblenden"