Symbolleiste ausblenden VBA
16.01.2004 16:42:12
Michael S.
ich habe mir folgenden Code in eine Exeldatei kopiert:
Private Sub CommandButton1_Click()
Application.DisplayFullScreen = Not Application.DisplayFullScreen
Application.CommandBars("Full Screen").Enabled = Not Application.CommandBars("Full Screen").Enabled
Application.CommandBars("Worksheet Menu Bar").Enabled = Not Application.CommandBars("Worksheet Menu Bar").Enabled
ActiveWindow.DisplayHeadings = Not ActiveWindow.DisplayHeadings
End Sub
Dieser Code funktioniert mit einem Button.
Ich möchte allerdings beim Starten meiner Exceldatei alles ausblenden lassen (Symbolleiste, Menüleiste, Bearbeitungsleiste, usw...) Lediglich die vertikale Scrolleiste soll noch zu sehen sein.
Mein Probelm: Alle anderen Exceldateien sollen davon unberührt bleiben. Das bedeutet: Wenn ich meine Datei starte, dann soll alles verschwinden und wenn ich die Datei wieder schließe, dann soll alles wieder beim alten sein...
KAnn mir jemdand weiterhelfen?
Michael S.