Command bars
15.07.2002 21:12:33
Michael
Sub AusBlenden()
CommandBars("Worksheet Menu Bar").Enabled = False
Application.DisplayFullScreen = True
'ActiveWorkbook.Protect Windows:=True
End Sub
Sub EinBlenden()
ActiveWorkbook.Unprotect
CommandBars("Worksheet Menu Bar").Enabled = True
Application.DisplayFullScreen = False
End Sub
Wie mach ich das (Anfänger), das die Symbole für Drucken, Speichern und Schliessen trotzdem noch sichtbar sind.
Wer kann mir helfen ?