Fixer Zoomwert im Schnellzugriff

[excelbastler0815]

Hallo zusammen,
habe zumindest mit der Suchfunktion nichts konkretes zum Thema gefunden.

Meine Aufgabe ist es, in die Schnellzugriffleiste einen Button zu setzen, welcher den aktuellen Zoom auf einen konkreten Wert, z.B. 85 setzt.
Bisher ist es mir nur gelungen, die Zoom-Schaltflächen in den Schnellzugriff zu kriegen, ich kann diese aber nicht konfigurieren oder vorbesetzen.

Viele Grüße,
Michael

[mumpel]

Hallo!

Das musst Du per VBA mache. Also ein passendes Makro erstellen und dieses in die QAT legen.

Gruß, René

[excelbastler0815]

Ich erwarte jetzt nicht dass mir jemand das Makro bastelt , aber weiss jemand /hat jemand ein Ähnliches Makro, von dem ich mir den Rest dann mit Nachlesen ableiten/anpassen kann, ohne mich von 0 in das Thema Makro reinarbeiten zu müssen. Gerade was Aufbau und Syntax angeht.

[mumpel]

Da hilft sicher der Makrorekorder. ;)

Sub Zoom85()
  ActiveWindow.Zoom = 85
End Sub

VBA/HTML-CodeConverter, AddIn für Office 2002-2016 - in VBA geschrieben von Lukas Mosimann. Projektbetreuung:RMH Software & Media
Code erstellt und getestet in Office 16 - mit VBAHTML 12.6.0