Excel 2007 - Command Bars deaktivieren

Achim_53599a · 11. November 2019 um 14:05

Hallo liebes Forum,

ich möchte in Excel 2007 beim Öffnen der Datei alle Menüs ausblenden oder deaktivieren.
Dazu habe ich folgende Einträge in „Diese Arbeitsmappe“ gesetzt:

Private Sub Workbook_Open()
Dim cb As CommandBar
For Each cb In Application.CommandBars
cb.Enabled = False
Next cb
Application.DisplayFormulaBar = False
Application.DisplayStatusBar = False
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim cb As CommandBar
For Each cb In Application.CommandBars
cb.Enabled = True
Next cb
Application.DisplayFormulaBar = True
Application.DisplayStatusBar = True
End Sub

Leider tut sich da bei mir rein gar nicht, alles ist noch zu sehen und funktioniert noch. Wo liegt mein Fehler?

Gruß

Markus_K_ln · 11. November 2019 um 14:05

Hi Achim,

von 2007 weiß ich nix. Aber in 2003 funktioniert Deine Prozedur: alle Symbolleisten werden ausgeblendet. Dabei erheben sich allerdings Fragen:

das Menü-Dingens in 2007 heißt Ribbon. Kann es sein, daß das Ribbon nicht zu Application.CommandBars gehört?
Zum Ausblenden würde ich stets .Visible, zum Deaktivieren .Enabled nehmen Zwar werden in 2003 die Symbolleisten Standard und Format beim dis-Enablen auch ausgeblendet, doch das ist eigentlich unlogisch.
Was passiert, wenn Du mit .Visible arbeitest?

M.
___________
P.S.: mich würde sehr interessieren, warum Du das Ribbon weghaben möchtest.

Reinhard_fb8cb7 · 11. November 2019 um 14:05

Hallo Markus,

von 2007 weiß ich nix.

ich hab 2007 Home & student. Aber Wissen zu 2007 hab ich nichts spezielles

das Menü-Dingens in 2007 heißt Ribbon. Kann es sein, daß das
Ribbon nicht zu Application.CommandBars gehört?

Jain, es gibt ein Command Bar das heißt „Ribbon“, muß aber was anderes sein, jedenfalls sieht man keine Reaktion am Bidlschirm bei diesem Code:

Sub test()
With Application.CommandBars("Ribbon")
 '.Enabled = Not .Enabled
 .Visible = Not .Visible
End With
End Sub

Nachträglich (Achtung, lange Tabelle *gg*) sieht man „oben“ nichts verschwinden oder auftauchen. Ich denke an diesen Ribbon-Kram (der angeblich gar nicht schlecht sein soll) muß man durch anderen Code als durch CommandBars gelangen.

Mein Tipp an den Anfrager, bitte den Mod, in diesem fall also das Team dich ins besser passende Excel-Brett zu verschieben.
Zumindest Thomas kennt sich in Excel2007 sehr gut aus.

Nachfolgend der Code, getestet auf 2007 Home & Student und die entstandene Tabelle. Interessant ist daß es da zwei CommandBars gibt die je nur ein Leerzeichen als Namen haben.
Naja, Excel-Logik

Gruß
Reinhard

Option Explicit
'
Private Sub Workbook\_Open()
Dim cb As CommandBar, Zei As Long, Spa As Long
Call Ruecksetzen
On Error GoTo hell
Cells(1, 1).Value = "Name"
Cells(1, 2).Value = "Vis-Status"
Cells(1, 3).Value = "Vis=False"
Cells(1, 4).Value = "Ena-Status"
Cells(1, 5).Value = "Ena=False"
Spa = 3
For Each cb In Application.CommandBars
 Zei = Zei + 1
 Cells(Zei + 1, 1) = cb.Name
 Cells(Zei + 1, 2) = cb.Visible
 Cells(Zei + 1, Spa) = "ok"
 cb.Visible = False
Next cb
Call Ruecksetzen
Spa = 5
Zei = 0
For Each cb In Application.CommandBars
 Zei = Zei + 1
 Cells(Zei + 1, 4) = cb.Visible
 Cells(Zei + 1, Spa) = "ok"
 cb.Visible = False
Next cb
'Call Ruecksetzen
Exit Sub
hell:
Cells(Zei + 1, Spa).Value = "Fehler"
Resume Next
End Sub
'
Sub Ruecksetzen()
Dim cb As CommandBar
For Each cb In Application.CommandBars
 cb.Reset
Next cb
End Sub

Sub test()
With Application.CommandBars("Ribbon")
 '.Enabled = Not .Enabled
 .Visible = Not .Visible
End With
End Sub




Tabellenblatt: [Mappe1]!Tabelle1
 │ A │ B │ C │ D │ E │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 1 │ Name │ Vis-Status │ Vis=False │ Ena-Status │ Ena=False │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 2 │ Worksheet Menu Bar │ WAHR │ Fehler │ WAHR │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 3 │ Chart Menu Bar │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 4 │ WordArt │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 5 │ Picture │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 6 │ Drawing Canvas │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 7 │ Organization Chart │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 8 │ Diagram │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 9 │ Ink Drawing and Writing │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 10 │ Ink Annotations │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 11 │ Circular Reference │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 12 │ PivotTable Field List │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 13 │ Standard │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 14 │ Formatting │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 15 │ PivotTable │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 16 │ Chart │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 17 │ Reviewing │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 18 │ Forms │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 19 │ Stop Recording │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 20 │ External Data │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 21 │ Formula Auditing │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 22 │ Full Screen │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 23 │ PivotChart Menu │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 24 │ Visual Basic │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 25 │ Web │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 26 │ Control Toolbox │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 27 │ Exit Design Mode │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 28 │ Refresh │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 29 │ Watch Window │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 30 │ PivotChart Filter Pane │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 31 │ Borders │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 32 │ Protection │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 33 │ Text To Speech │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 34 │ List │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 35 │ Compare Side by Side │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 36 │ Workbook tabs │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 37 │ Cell │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 38 │ Column │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 39 │ Row │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 40 │ Cell │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 41 │ Column │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 42 │ Row │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 43 │ Ply │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 44 │ XLM Cell │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 45 │ Document │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 46 │ Desktop │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 47 │ Nondefault Drag and Drop │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 48 │ AutoFill │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 49 │ Button │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 50 │ Dialog │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 51 │ Series │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 52 │ Plot Area │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 53 │ Floor and Walls │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 54 │ Trendline │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 55 │ Chart │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 56 │ Format Data Series │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 57 │ Format Axis │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 58 │ Format Legend Entry │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 59 │ Formula Bar │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 60 │ PivotTable Context Menu │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 61 │ Query │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 62 │ Query Layout │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 63 │ AutoCalculate │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 64 │ Object/Plot │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 65 │ Title Bar (Charting) │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 66 │ Layout │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 67 │ Pivot Chart Popup │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 68 │ Phonetic Information │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 69 │ Auto Sum │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 70 │ Paste Special Dropdown │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 71 │ Find Format │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 72 │ Replace Format │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 73 │ List Range Popup │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 74 │ List Range Layout Popup │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 75 │ XML Range Popup │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 76 │ List Range Layout Popup │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 77 │ Nil │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 78 │ Filter Names │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 79 │ Excel Previewer │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 80 │ &Legacy Keyboard Support │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 81 │ Drawing │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 82 │ Shadow Settings │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 83 │ 3-D Settings │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 84 │ Borders │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 85 │ Borders │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 86 │ Draw Border │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 87 │ Chart Type │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 88 │ Pattern │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 89 │ Font Color │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 90 │ Fill Color │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 91 │ Line Color │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 92 │ Drawing and Writing Pens │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 93 │ Annotation Pens │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 94 │ Drawing and Writing Pens │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 95 │ Annotation Pens │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 96 │ Order │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 97 │ Nudge │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 98 │ Align or Distribute │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
 99 │ Rotate or Flip │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
100 │ Lines │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
101 │ Connectors │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
102 │ AutoShapes │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
103 │ Callouts │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
104 │ Flowchart │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
105 │ Block Arrows │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
106 │ Stars & Banners │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
107 │ Basic Shapes │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
108 │ Insert Shape │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
109 │ Shapes │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
110 │ Inactive Chart │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
111 │ Excel Control │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
112 │ Curve │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
113 │ Curve Node │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
114 │ Curve Segment │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
115 │ Pictures Context Menu │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
116 │ OLE Object │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
117 │ ActiveX Control │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
118 │ WordArt Context Menu │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
119 │ Rotate Mode │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
120 │ Connector │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
121 │ Script Anchor Popup │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
122 │ Canvas Popup │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
123 │ Organization Chart Popup │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
124 │ Diagram │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
125 │ Layout │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
126 │ Select │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
127 │ Task Pane │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
128 │ │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
129 │ Property Editor │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
130 │ Office Clipboard │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
131 │ XML Source │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
132 │ Research │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
133 │ XML Document │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
134 │ Signatures │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
135 │ Document Actions │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
136 │ Clip Art │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
137 │ Selection and Visibility │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
138 │ Document Management │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
139 │ Document Updates │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
140 │ Mail Merge Panes │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
141 │ Fax Service │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
142 │ Meeting Workspace │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
143 │ Attachment Options │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
144 │ Ribbon Adapter │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
145 │ Add Command │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
146 │ Built-in Menus │ FALSCH │ Fehler │ FALSCH │ Fehler │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
147 │ Clipboard │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
148 │ Envelope │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
149 │ Online Meeting │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
150 │ │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
151 │ Status Bar │ FALSCH │ ok │ FALSCH │ ok │
────┼──────────────────────────┼────────────┼───────────┼────────────┼───────────┤
152 │ Ribbon │ WAHR │ ok │ WAHR │ ok │
────┴──────────────────────────┴────────────┴───────────┴────────────┴───────────┘
A1:E152
haben das Zahlenformat: Standard

Tabellendarstellung erreicht mit dem Code in FAQ:2363

Reinhard_fb8cb7 · 11. November 2019 um 14:05

Excel 2007 Symbolleisten
Hallo Markus,

wenn du dich dafür interessierst, schau mal hier:

http://hajo-excel.de/vba_menue2007.htm

ansonsten, mit diesen Ribbons, scheinbar ist es gut wenn man da sich auskennt/hat WinZip, XML-Editor. Im folgenden etwas was ein „Mumpel“ zum gleichen Thema schrieb:

************************************************************************
"Über VBA lassen sich die Einträge nicht deaktivieren, da es sich bei
der Multifunktionsleiste um XML handelt. Ein eigenes Tab gilt nur für
die Arbeitsmappe, in der sie integriert ist, bei Wechsel in andere
Arbeitsmappe verschwindet das Tab. Soll es in allen Arbeitsmappen
gelten, dann muss als Addin (*.xlam) gespeichert werden.

Schau mal hier: www.herber.de/ribbonx.html , da bekommst Du eine
Hilfedatei und die „Createribbon.xlsm“. Mi dieser kannst Du lernen,
eigene Ribbon zu erstellen (erfordert Winzip). Allerdings genügt
diese Arbeitsmappe nur Übungsniveau. Für Profis weniger geeignet.
Benutze lieber einen XML-Editor, zum Beispiel „Microsoft Visual Basic
2005 Expressedition“ und das CustomUI-Schema.

Auf http://www.ms-office-forum.net/forum/forumdisplay.ph… habe
ich schon Hilfestellung gegeben. Suche dort nach meinem Nick
(mumpel), dann wirst Du finden.

„Start from Scratch = True“ kann ich nicht empfehlen, da nachteilig.

Gilt nur für Arbeitsmappe, in der es programmiert wurde
Deaktiviert auch die Schnellstartleiste und die meisten Office-
Menü-Einträge, darunter auch „Schließen“.
In Addins (*.xlam) wirkungslos (muss so sein).
************************************************************************

Hinweis von mir, das mit Scratch bezog sich auf diesen XML-Code:

Gruß
Reinhard

Thomas_Ramel · 11. November 2019 um 14:06

Grüezi Achim

ich möchte in Excel 2007 beim Öffnen der Datei alle Menüs
ausblenden oder deaktivieren.
Dazu habe ich folgende Einträge in „Diese Arbeitsmappe“
gesetzt:

Woher hast Du die verwendeten Code-Zeilen?
Ich vermute kaum aus xl2007, sondern noch aus älteren Versionen?

Die gängigen CommandBars gibt es in xl2007 nicht mehr - wenn Du künftig (also ab xl2007) die Ribbons programmieren willst, dann musst Du tief in die XML-Programmierung derselben einsteigen (Reinhard hat dir dazu ja bereits einige nachhaltige Links genannt).

Mach mal einen Doppelklick auf den Ribbon - er sollte sich nun
zusammenklappen. Dasselbe erreichst Du mit der Tastenkombination STRG+F1.
Eniblenden geht ebenso - in den Ribbon klicken und STRG+F1 drücken.

Diese Tastenkombination kannst Du auch beim Starten einer Mappe aus VBA
heraus (eben mit SendKeys, siehe die Online-Hilfe dazu) senden und der
Ribbon wird zusammengeklappt.

Mit freundlichen Grüssen

Thomas Ramel

MVP für MS-Excel -