Inhalt
- Gitternetzlinien ausblenden
- Spalten- und Zeilenüberschriften ausblenden
- Bearbeitungsleiste ausblenden
- Vollbildmodus aktivieren
- Horizontale und vertikale Scrollleiste deaktivieren
- Tabellenblattleiste deaktivieren
- Das Open-Event/Ereignis
- Eigenes Symbol für Excel-Datei einfügen
Code (Modul)
Sub BenutzerModus() Application.ExecuteExcel4Macro "Show.Toolbar(""Ribbon"",False)" Application.DisplayFormulaBar = False Application.DisplayFullScreen = True ActiveWindow.DisplayHorizontalScrollBar = False ActiveWindow.DisplayVerticalScrollBar = False ActiveWindow.DisplayWorkbookTabs = False End Sub Sub EntwicklerModus() Application.DisplayFullScreen = False Application.ExecuteExcel4Macro "Show.Toolbar(""Ribbon"",True)" Application.DisplayFormulaBar = True ActiveWindow.DisplayHorizontalScrollBar = True ActiveWindow.DisplayVerticalScrollBar = True ActiveWindow.DisplayWorkbookTabs = True 'Bereitgestellt von VBATrainer: www.vbatrainer.de End Sub
Code (DieseArbeitsmappe)
Private Sub Workbook_Open() Call BenutzerModus 'Bereitgestellt von VBATrainer: www.vbatrainer.de End Sub