---

Hallo ich habe ein Problem, wenn ich ein objekt mit (Set blockRefObj = ThisDrawing.ModelSpace.InsertBlock) einfüge hat das Objekt ja immer die gleiche grösse. Ich möchte das objekt jetzt von 2000 auf 3000mm strecken. Wie kann ich das machen? Mit Xscale as double kann ich es nicht machen sonst werden die einzelteile ja auch dementsprechent vergrössert. Gibt es eine Funktion im VBA um das Objekt zu strecken und nicht skalieren.
gruss schmodi

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi schmodi,

Das ist meines Wissens mit VBA nicht möglich.

Gruß, Carsten

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Blockreferenzen zu strecken geht in AutoCAD nur, wenn es "Dynamische Blöcke" sind. Die Dynamik muss vorher ensprechend über einen Strecken Parameter/Strecken Aktion definiert werden. Diese kann man dann auch per VBA für jede Blockreferenz unterschiedlich steuern.

Normale Blöcke kann man nur über ungleichmäige Skalierfaktoren strecken (ist ja nicht gewünscht). Ansonsten kann man die Blockreferenz nur auflösen und dann die Einzelteile strecken, oder man streckt eben die Blockdefinition, da sehen aber alle Blockreferenen entsprechend gestreckt aus.

------------------
Mit freundlichem Gruß

Udo Hübner

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP