Produkt(e):	MicroStation
	Version(en):	V8i Edition
	Umgebung:	N\A
	Produktbereich:	Bemusterung
	Produktunterbereich:	Allgemein

Problem

Seit der V8i Version ist es nicht mehr möglich, mehrere Schraffuren und/oder Muster zugleich auszuwählen und mit dem Tool "Assoziative Bemusterung auflösen" aufzulösen. Dies funktioniert nur noch mit einzelnen Schraffuren / Muster wenn diese nach dem Auswählen des Tools ausgewählt werden und nicht mit zuvor ausgewählten Schraffuren / Muster.

Problemlösung

Mit dem folgendem VBA Makro kann man mehrere Schraffuren / Muster zugleich auflösen:

communities.bentley.com/.../DropPatternBySelect.zip

So führt man das VBA aus:

-Das "DropPatternBySelect.mvba" in einem Verzeichnis, wo die Konfigurations-Variable MS_VBASEARCHDIRECTORIES hinzeigt, abspeichern.
Das könnte z.B. das Verzeichnis .../Workspace/Standards/vba sein.
-Die Zeichnung, in welcher mehrere Schraffuren / Muster zugleich aufgelöst werden sollen, öffnen.
-Alle gewünschten Schraffuren / Muster fürs Auflösen auswählen
-Über den Menüpunkt: "Extras" > "Makro" > "Projekt-Manager" > "Projekt laden" > in das Verzeichnis des VBA Makros wechseln und das VBA "DropPatternBySelect" auswählen
-In der Liste das VBA "DropPatternBySelect" doppeltklicken und im nächsten Dialg "Ausführen" klicken
-Alternativ zu Punkt 4 + 5 kann auch folgender Tastatureingabefehl über den Menüpunkt: "Extras" > "Tastatureingabe" eingegeben und mit der "Eingabe"-Taste bestätigt werden: VBA RUN [DropPatternBySelect]Main

Sehen Sie hierzu auch

X

Anderssprachige Quellen

English

Ursprünglicher Autor:

Yvonne Lohse