Supportnet / Forum / Tabellenkalkulation
Bildschirmansicht
Frage
Hallo,
mit welchem Code kann ich erreichen, das ein oder alle Tabellenblätter im Vollbildmodus , ohne Überschriften, Bildlaufleisten und Registerkarten angezeigt wird?
Dank im Vorraus
elLebro
Antwort 1 von Ahnan
Hallo,
z.B. so:
Option Explicit
Sub Alles_ausblenden()
Application.DisplayFullScreen = True
With ActiveWindow
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
.DisplayHeadings = False
End With
End Sub
Sub Alles_einblenden()
Application.DisplayFullScreen = False
With ActiveWindow
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayWorkbookTabs = True
.DisplayHeadings = True
End With
End Sub
1. Einblenden Ganzer Bildschirm (FullScreen)
2. u. 3. Bildlaufleisten ausblenden
4.Tabellenreiter ausblenden
5.Zeilen-Spaltenüberschriften ausblenden
Das meiste kann man übrigens über Makros aufzeichnen selbst herausfinden.
MfG
z.B. so:
Option Explicit
Sub Alles_ausblenden()
Application.DisplayFullScreen = True
With ActiveWindow
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
.DisplayHeadings = False
End With
End Sub
Sub Alles_einblenden()
Application.DisplayFullScreen = False
With ActiveWindow
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayWorkbookTabs = True
.DisplayHeadings = True
End With
End Sub
1. Einblenden Ganzer Bildschirm (FullScreen)
2. u. 3. Bildlaufleisten ausblenden
4.Tabellenreiter ausblenden
5.Zeilen-Spaltenüberschriften ausblenden
Das meiste kann man übrigens über Makros aufzeichnen selbst herausfinden.
MfG