update auf office2007
13.02.2007 22:54:00
Holger
habe ein update auf Office 2007 durchgeführt, nur jetzt habe ich bei meinem erstellten Workbook ein kleines Problem. Habe mit folgendem Code unter offic 2003 alles ausgeblendet, doch unter 2007 habe ich jetzt obenam Bildschirm eine neue "blaue" Leiste stehen mit "Name der Mappe" (Kompatibilitätsmodus)-Microsoft Excel. Wie kann ich die auchwieder ausblenden?
Sub meineansicht()
Application.ScreenUpdating = False
' mausscrollbereich festlegen
Sheets("Auswahl").ScrollArea = "A$1:$H$39"
' alle Spalten- und Zeilenköpfe ausblenden
Dim I As Integer
For I = 1 To ActiveWorkbook.Worksheets.Count
Worksheets(I).Activate
ActiveWindow.DisplayHeadings = False
Next I
Sheets(1).Activate
Application.DisplayFullScreen = True
Application.DisplayStatusBar = False
Application.DisplayScrollBars = False
Application.DisplayFormulaBar = False
Application.CommandBars("Worksheet Menu Bar").Enabled = False
Application.CommandBars("Cell").Enabled = False
Application.ScreenUpdating = True
End Sub
Gruß und Dank
Holger
Anzeige