Hallo zusammen!
Ich habe mir ein kleines VBA-Makro gebaut, um den Maßstab in Zeichnungen schneller zu verstellen — ohne jedes Mal über das Statusleisten-Dropdown oder den PropertyManager zu gehen. Vielleicht hat ja noch jemand Verwendung dafür.
Was es macht
Das Makro hat zwei Einsprungpunkte, die man auf zwei Tasten/Buttons legt:
- Maßstab verkleinern
- Maßstab vergrößern
Bei jedem Tastendruck entscheidet das Makro selbst, worauf es wirkt:
Ist eine Ansicht mit benutzerdefiniertem Maßstab ausgewählt → es ändert nur den Maßstab dieser Ansicht.
Ist nichts ausgewählt (oder die Ansicht folgt Blatt- bzw. Eltern-Maßstab) → es ändert den Blattmaßstab.
Wie geschrittet wird
Das Inkrement ist immer 1. Gerechnet wird auf dem Maßstab-Bruch (Zähler:Nenner):
- Verkleinern: 1:5 → 1:6 → 1:7 …
- Vergrößern: umgekehrt, und über 1:1 hinaus weiter zu 2:1, 3:1 …
Der Übergang über 1:1 funktioniert sauber, und der Maßstab bleibt immer ≥ 1 — landet also nie auf 0 oder negativ.
Bewusste Designentscheidung
Eine ausgewählte Ansicht, die auf „Blattmaßstab" oder „Elternmaßstab" steht, wird nicht angefasst — der Tastendruck fällt dann auf den Blattmaßstab zurück. So wird eine Ansicht nicht ungewollt auf „benutzerdefiniert" umgeschaltet, nur weil sie gerade markiert war.
Sonstiges
Keine Dialoge, keine Bestätigungsmeldungen — der Maßstab ändert sich einfach. Getestet unter SolidWorks 2022 SP5.
------------------
www.slt-bauer.de
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
Foren auf CAD.de
