---

Hallo Catia Gemeinde,
leider kann ich selbst keine Makros programmieren, daher hoffe ich auf eure Mithilfe.
In meiner Konstruktionssystematik nutze ich oft Abzugskörper für Taschen, Gewinde,Freimachung usw..
Die Abzugskörper werden dann per Kopieren-> Einfügen Spezial mit Verlinkung -> Boolische Operation Entfernen in einem anderen Part eingefügt.
Das dauert immer zulange ich würde dies gerne abkürzen.
Ich hoffe jemand hat so ein Makro für mich.

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

---

Servus

Willkommen im Forum. Bitte Systeminfo ausfüllen.
Hast du schon probiert das Makro selbst zu erstellen?

Gruß
Bernd

PS: ggf kannst du das Makro auch deinem Systemhaus oder anderen Firma programmieren lassen.

PS2: rein aus Interesse: warum werden die Körper in ein anders Part kopiert?

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

BauteilmitAbzugskorper.JPG AbzugskorpermitLink.JPG

Hallo bgrittmann danke für die korreke zuordnung des Beirags,

Von Makroprogramierung habe ich leider überhaubt keine ahnung.

Ich nutze die Abzugskörper für Standarbauteile die in verschiedenen Konstruktionen eingesetzt werden.

ich habe das netz schon abgesucht doch leider niemanden gefunden der soetwas erstellt hat,deswegen hoffe ich auf das jemand mit diesen gefallen zun könnte.

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

---

Servus

Schon mal an die Verwendung einer PowerCopy in Betracht gezogen? (Ggf in Katalog ablegen)
Dann bräuchtest du keine Makro.

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

Moin,

daran hatte ich auch schon gedacht, aber er möchte das ja MIT Link erzeugen.

Gruß
Randle

------------------
Wer für nichts steht, fällt für alles!

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

---

Fehler.JPG

Ich habe mal was mit der Makroaufzeichnung probiert es lauft leider nicht durch vielleicht kann mir da jemand weiterhelfen ??

Language="VBSCRIPT"

Sub CATMain()

Dim productDocument1 As Document
Set productDocument1 = CATIA.ActiveDocument

Dim selection1 As Selection
Set selection1 = productDocument1.Selection

selection1.Clear

Dim documents1 As Documents
Set documents1 = CATIA.Documents

Dim partDocument1 As Document
Set partDocument1 = documents1.Item
Dim part1 As Part
Set part1 = partDocument1.Part

Dim bodies1 As Bodies
Set bodies1 = part1.Bodies

Dim body1 As Body
Set body1 = bodies1.Item("Körper.1")

selection1.Add body1

selection1.Copy

Dim partDocument2 As Document
Set partDocument2 = documents1.Item

Dim part2 As Part
Set part2 = partDocument2.Part

part2.Update

Dim shapeFactory1 As Factory
Set shapeFactory1 = part2.ShapeFactory

Dim bodies2 As Bodies
Set bodies2 = part2.Bodies

Dim body2 As Body
Set body2 = bodies2.Item("Körper.8")

shapeFactory1.AddNewRemove body2

part2.Update

End Sub

[Diese Nachricht wurde von Snover am 24. Jun. 2020 editiert.]

[Diese Nachricht wurde von Snover am 24. Jun. 2020 editiert.]

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

---

Moin,

der Fehler tritt in der Zeile:

Zitat:

---

Set partDocument1 = documents1.Item

---

auf.

Normalerweise müsste dem documents1.Item noch eine Zahl in Klammern folgen.
Also z.B. Set partDocument1 = documents1.Item(1).

Nun kannst du aber nicht einfach dort irgendeine Nummer eingeben, du  willst ja schließlich nicht irgendein Dokument zuweisen. Das Makro soll ja wahrscheinlich universell laufen. Du müsstest also auch sicher sein das die notwendigen Dokumente geöffnet sind, bzw. geöffnet werden.

Ich denke es wird schwierig werden das über die Makroaufnahme zu realisieren.

Gruß
Randle

------------------
Wer für nichts steht, fällt für alles!

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

---

Fehler.JPG

Eigentlich sollte es so sein:

ich setze ein Part in Bearbeitung dann selektiere ich den gewünschten Abzugskörper aus einem anderen Part und lasse dann das Makro laufen.

jetzt ist der Fehler wo anders  

Language="VBSCRIPT"

Sub CATMain()

selection1.Copy

Dim shapeFactory1 As Factory
Set shapeFactory1 = part2.ShapeFactory

Dim bodies2 As Bodies
Set bodies2 = part2.Bodies

Dim body2 As Body
Set body2 = bodies2.Item(1)

shapeFactory1.AddNewRemove body2

part2.Update

End Sub

so müsste es für mein Verständnis sein leider lauft es nicht

[Diese Nachricht wurde von Snover am 24. Jun. 2020 editiert.]

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

---

wo wird selection1 definiert?
wo wird part2 definiert?

Ich denke das wird ohne Grundlagenwissen nichts.

Such dir einen Dienstleister oder besuche einen entsprechenden Kurs (evtl. würde auch ein Buch weiterhelfen).

Gruß
Randle

------------------
Wer für nichts steht, fällt für alles!

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

---

Servus Snover

Ich vermute dass du die Körper aus einer Instanz bzw Exemplar aus einer Baugruppe kopieren bzw einfügen willst. Nur dann wird die relative Position von Quellteil zu Zielteil mitgenommen. Schau dir mal diesen Code und die Erklärung an.
Viel Spaß beim Analysieren, Verstehen, Nachschlagen des Codes bzw der Methoden.

Gruß
Bernd

PS: Für das was du vor hast würde ich mindesten zwei Arbeitstage einplanen (und ich hab vermutlich mehr Ahnung von der Materie)

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

Hallo,

falls du mit der Makro-Programmierung nicht weiter kommst, hier vielleicht ein anderer Ansatz, wie ich das gelöst habe:

Hol dir eine Tastatur mit Makro-Tasten (z.B. Logitech G710+) und speicher dir dort die Tastenfolge ab. Dazu muss "Paste special..." mit einem beliebigen Shortcut belegt werden. Du musst dann nur den entsprechenden Body im Part markieren, deine Shortcut-Taste drücken und dir wird am Ende des Baumes ein verlinkter Körper erstellt.
Nur den Remove-Befehl müsstest du dann noch händisch machen.

Wenn du Interesse hast, kann ich dir die Tastenabfolge gerne schicken...lässt sich halt leider nicht so einfach aus der Logitech Software kopieren.

MfG der Smokie

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

---

-Doppelpost-

Kann gelöscht werden.

[Diese Nachricht wurde von SmokieMcPot am 15. Jul. 2020 editiert.]

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

---

zugeordnetes_Teil.jpg

Servus,

schon mal mit dem Button "zu zugeordnete Teil hinzufügen" probiert. Ist zwar kein Macro, aber das kopieren ist wesentlich bequemer.

------------------
Habe D`Ehre

Felsen

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