mit VBA den Zoomregler in der Statusleiste einschalten

06/03/2016 - 07:55 von Hans Alborg | Report spam
Hallo,

<Excel 2007>

Weil er manchmal nicht da ist (andere Rechner???) möchte ich für meine Mappe
den Zoomregler unten rechts in der Statusleiste mit VBA einschalten.
Per Hand geht das mit Rechtsklick auf die Statusleiste und Haken ganz unten
("Zoomregler") setzen.
Auch eine Abfrage vorher, ob er schon angezeigt wird, wàre gut.

Der Makrorekorder bringt nix, und ein Fund im Netz lautet etwa...

Sub Scrollfeld_aktivieren()
Dim Scrolling
For Each Scrolling In _
Application.CommandBars. _
FindControls(ID:99)
Scrolling.Enabled = True
Next
End Sub

Da meckert mein VBA wegen "Applications".
Auch "ThisWorkbook" statt dessen geht nicht.

Die For-Next Schleife braucht auch zu viel Zeit.
Gibts da was Einfaches?

TIA,

Hans
 

Lesen sie die antworten

#1 Claus Busch
06/03/2016 - 08:04 | Warnen spam
Hallo Hans,

Am Sun, 6 Mar 2016 07:55:31 +0100 schrieb Hans Alborg:

Weil er manchmal nicht da ist (andere Rechner???) möchte ich für meine Mappe
den Zoomregler unten rechts in der Statusleiste mit VBA einschalten.



probiers mal mit:
ActiveWindow.DisplayHorizontalScrollBar = True


Mit freundlichen Grüßen
Claus
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional

Ähnliche fragen