Ausblenden aller Symbolleisten - Anschliessendes Problem Darstellung Excel

[stefan1976]

Hallo,

ich habe ein Bsp.code gesehen, wo das ausblenden durch den Vollbildmodus ermöglicht wird. Dies dürfte jedoch eher unsauber sein. Ich brauche Excel nur kurz minimieren (Taskleiste Windows) und dann wieder maximieren und schon habe ich wieder alle.

Ich habe das ganze so gelöst:

Dim c As Object

On Error Resume Next

Application.ScreenUpdating = False

For Each c In Application.CommandBars

c.Enabled = false

Next

Application.DisplayFormulaBar = False

ActiveWindow.DisplayHeadings = False

ActiveWindow.DisplayHorizontalScrollBar = False

ActiveWindow.DisplayVerticalScrollBar = False

Funktioniert super, nur manchmal kommt es vor, dass oben plötzlich dort, wo normalerweise die Symbolleisten sind eine blaue Fläche auftritt und nichtmehr weggeht. Passiert wenn man ein bisschen hin - und herklickt. Mal ein Formular startet oder Sheets hin - und herwechselt.Was passiert da?

[MartinSt]

was soll das Ausblenden überhaupt für ein Sinn haben?

[stefan1976]

Der Grund ist folgender. Es handelt sich um ein Excelsheet das Daten berechnet. Es muss ausgeschlossen werden das der User irgendetwas anstellen kann. Ein weiterer Vorteil ist der Platzgewinn auf dem Bildschirm, dass heisst die Informationen können ohne scrollen eingesehen werden. Und nachdem der User sowiesonichts machen darf, ist dass eigentlich eine schöne Sache.

[MartinSt]

Ist das der komplette Code des Makros?

Gibt es weitere Makros in der Tabelle?

warum setzt du Application.ScreenUpdating = False?