Das Archiv des Excel-Forums

Ausblenden von CommandBars etc...

Bild

Betrifft: Ausblenden von CommandBars etc...
von: Alex

Geschrieben am: 25.09.2003 11:20:00

Hallo zusammen,

habe folgendes Problem.

Ich würde gerne beim starten der Excel-Mappe alle Menüleisten ausblenden und beim beenden wieder einblenden.
Das erste Problem hab ich beim ausblenden. Wenn ich meinen Code (s.u.) laufen lasse, blendet er zwar alle ein/aus, aber dann kommt immer die Fehlermeldung:
>Laufzeitfehler '-2143....'
>Automatisierungsfehler
>unbekannter Fehler

Mein Code zum ausblenden ist einfach:

Dim cb As CommandBar
For Each cb In Application.CommandBars
cb.Visible = False
Next cb


Hat jemand vielleicht schon fertigen Code zum ein/ausblenden aller Menuleisten.
Zum anderen würde ich auch gerne die Zeilen und Spaltenüberschriften ausblenden.

Eine Lösung wäre echt klasse...
Vielen Dank

Alex
Bild


Betrifft: AW: Ausblenden von CommandBars etc...
von: Carsten
Geschrieben am: 25.09.2003 11:53:08

Hallo Alex,

folgender Code in "Diese Arbeitsmappe" bewirkt, dass die betreffende Datei immer im Vollbildmodus angezeigt wird, alle anderen Mappen aber ganz normal (z.B. beim Wechsel der Mappen durch Strg + Tab).


Private Sub Workbook_WindowActivate(ByVal Wn As Window)
Application.DisplayFullScreen = True
Application.CommandBars("Full Screen").Visible = False
Application.CommandBars("Worksheet Menu Bar").Enabled = False
End Sub



Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)
With Application
.DisplayFullScreen = False
.CommandBars("Full Screen").Visible = False
.CommandBars("Worksheet Menu Bar").Enabled = True
End With
End Sub


Ich hoffe, es hilft.

Gruß
Carsten


 Bild

Excel-Beispiele zum Thema " Ausblenden von CommandBars etc..."

Fehlermeldung #NV ausblenden download Spalten einer Mehrbereichsauswahl ausblenden. download
Symbolleisten ein-/ausblenden download Zeilen und Spalten über ein Drehfeld ein- und ausblenden download
Excel für die Zeit eines Dialogaufrufes ausblenden download ComboBox in Abhängigkeit einer 2. ComboBox ein-/ausblenden download
Alle Menüs und Symbolleisten ausblenden download Entwicklungsumgebung ein- und ausblenden download
Leere Zeilen beim Druck ausblenden download Alle leeren Spalten ausblenden download
Zeilen mit Zellen mit rotem Hintergrund ausblenden download Arbeitsblattmenüleiste ein- und ausblenden download
Schaltfläche in einem Tabellenblatt ein- und ausblenden download UserForm-TextBoxes ein- und ausblenden download
Ausgblendetes Fenster ein- und aktives Fenster ausblenden download Excel und VBE auf Schaltflächendruck ein- und ausblenden download
Excel-Menü oben links am Fenster ausblenden download Spalten ein-/ausblenden nach UserForm-ListBox-Vorgabe download
Ein- und ausblenden von Blättern gem. UserForm-ComboBoxes download Kopfleiste einer UserForm ein- und ausblenden download
Spalten über UserForm-Auswahl ein- und ausblenden download Tabellenblattgrafik ein/ausblenden und verschieben download
Arbeitsblätter ausblenden download Datensätze unter Maximum ausblenden download
Alle Zeilen mit dem Wahrheitswert WAHR ausblenden download Tabellenblätter für Kalenderwochen anlegen und ein/ausblenden download
Grafik in Abhängigkeit eines Formelwertes ein/ausblenden download Spalten mit Zellen ohne Eintrag oder 0-Werten ausblenden download
Negative Zahlen ausblenden download Formate und Zellinhalte ausblenden download
Auflistung aller CommandBars download