Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema ScrollBar
BildScreenshot zu ScrollBar ScrollBar-Seite mit Beispielarbeitsmappe aufrufen

Ausblenden/Grundeinstellungen behalten

Betrifft: Ausblenden/Grundeinstellungen behalten von: Wolle
Geschrieben am: 19.08.2004 14:10:28

Hallo,
in meiner Arbeitsmappe wird folgendes ausgeblendet:

Private Sub Workbook_Open()
Windows(1).DisplayHorizontalScrollBar = False
Windows(1).DisplayVerticalScrollBar = False
Windows(1).DisplayWorkbookTabs = False
Windows(1).DisplayHeadings = False
Application.DisplayFormulaBar = False
Application.DisplayFullScreen = False
Application.CommandBars("Worksheet Menu Bar").Enabled = False
End Sub


Im Grunde, genau wie ich es mir vorstelle.
Allerdings ändert sich auch meine Excel-Grundeinstellung in anderen
Arbeitsmappen!
Wie kann ich es erreichen, das dieser Code nur für diese Mappe
Gültigkeit hat?
Gruß
Wolle
  


Betrifft: AW: Ausblenden/Grundeinstellungen behalten von: FloGo
Geschrieben am: 22.08.2004 11:16:24

Hallo Wolle

Beim schließen der Arbeitsmappe alles wieder rückgängig machen!?

etwa so:

Private Sub Workbook_BeforeClose()
Windows(1).DisplayHorizontalScrollBar = True
Windows(1).DisplayVerticalScrollBar = True
Windows(1).DisplayWorkbookTabs = True
Windows(1).DisplayHeadings = True
Application.DisplayFormulaBar = True
Application.DisplayFullScreen = True
Application.CommandBars("Worksheet Menu Bar").Enabled = True
End Sub


oder nicht???

FloGo