Das passt schon, probiere es einfach mal
Allerdings gibt es eine Bedingung: Du mußt beim Schreiben den Bezugspunkt richtig setzen (0,0)
Du kannst aber auch eine neue Zeichnung aufmachen,
die gewünschten Elemente auswählen und
über die Zwischenablage kopieren und
mit Originalkoordinaten in die neue Zeichnung einfügen
Fehlende Layer werden in beiden Fällen "mitgenommen"
Grüße
Klaus
[Edit]PS: Wenn es unbedingt über Makro (VBA) sein muß, such mal hier nach der CopyObjects - Methode
Da gibt es schon diverse Threads mit Beispielen.
[Diese Nachricht wurde von KlaK am 30. Mrz. 2013 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP