Kopieren von Zeichnungsobjekten innerhalb Koordinatenbereich (Autodesk/AutoCAD VBA)

Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte

Autor

Thema: Kopieren von Zeichnungsobjekten innerhalb Koordinatenbereich (705 mal gelesen)

K Murr
Mitglied
Konstrukteur

Senden Sie eine Private Message an K Murr

Schreiben Sie einen Gästebucheintrag für K Murr

Beiträge: 4
Registriert: 30.03.2013

erstellt am: 30. Mrz. 2013 08:15

Editieren oder löschen Sie diesen Beitrag!

<-- editieren / zitieren -->

Unities abgeben:

Grüße zu Ostern !

Hat Jemand einen Hinweis zu folgender Situation ?

Gibt es eine Möglichkeit in AutoCad durch Anwendung von VBA innerhalb eines Makros:

Zeichnungsinhalte einer Datei 1 innerhalb eines bestimmten durch Koordinaten definierten Bereiches zu kopieren ?

Zweck ist das anschließende Erstellen von einer seperaten nicht referenzierten Datei 2 die nur bestimmte Zeichnungsinhalte der Datei 1 beinhaltet.

Gruß und dankbar für Hinweise....

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

CAD-Huebner
Ehrenmitglied V.I.P. h.c.
Verm.- Ing., ATC-Trainer

Senden Sie eine Private Message an CAD-Huebner

Schreiben Sie einen Gästebucheintrag für CAD-Huebner

Beiträge: 9732
Registriert: 01.12.2003

AutoCAD 2.5 - 2022, LDD, MDT, RD, ADT, Civil
Inventor AIP 4-11, 2008 -2022
Win 10

erstellt am: 30. Mrz. 2013 08:25

<-- editieren / zitieren -->

Unities abgeben:

Nur für K Murr

Das muss nicht mal programmiert werden, dass kann man alles schon mit dem
Befehl: -WBLOCK
erreichen.
Wenns umbendingt VBA sein muss, dann ein Sendcommand mit dem Befehl benutzen.

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

Udo Hübner
www.CAD-Huebner.de

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

K Murr
Mitglied
Konstrukteur

Beiträge: 4
Registriert: 30.03.2013

erstellt am: 30. Mrz. 2013 09:22

<-- editieren / zitieren -->

Unities abgeben:

Beispiel_1.jpg

Danke für den Hinweis !

Bei näherer Betrachtung frage Ich mich ob damit folgende Punkte realisiert werden können:

1. Definition des Koordinatenbereiches ( Eingrenzung)
2. Beibehaltung der Elementeigenschaften (Layerzuordnung)

Im Anhang ein Beispielbild.( hoffe Upload war erfolgreich)

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

KlaK
Ehrenmitglied V.I.P. h.c.
Dipl. Ing. Vermessung, CAD- und Netz-Admin

Schreiben Sie einen Gästebucheintrag für KlaK

Beiträge: 2624
Registriert: 02.05.2006

AutoCAD LandDesktop R2 bis 2004
Civil 3D 2005 - 2022
Plateia, Canalis
Visual Basic

erstellt am: 30. Mrz. 2013 11:16

<-- editieren / zitieren -->

Unities abgeben:

Nur für K Murr

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

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)