---

Hallo Leute!

Ich möchte per VB eine Ansammlung von Linien und Punkten in geöffneten Körpern erstellen, die eine hierarchische Struktur bilden. Sprich:
Ein geöffneter Körper soll einen o. mehrere andere geöffnete/n Körper beeinhalten.
Denkbar wäre auch die Erstellung mehrere Körper in einem Dokument, in denen dann die geöffneten Körper abgelegt werden.

Mit der Workbench "Generative Shape Design" lässt sich soetwas ja (per Hand) erstellen, in dem man "Einfügen", "Offener Körper" anklickt und dann unter "Übergeordnetes Element" etwas auswählt.

Habe schon versucht per Makroaufzeichnung die Befehle zu ermitteln, leider ohne Erfolg.
Ebenfalls habe ich probiert, einen geöffneten Körper o. den Hauptkörper als "InWorkObject" zu setzen und dann mit

Set myHyBody = myPart.HybridBodies.Add

den geöff. Körp. hinzuzufügen. Funktionierte ebenfalls nicht.

Freue mich über jegliche Tipps zu meiner Problemstellung!

Mit freundlichem Gruß,

Tibby

P.s.: Die benutzte CATIA-Version lautet V5R11 SP2

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

---

Hi,

folgende Programmsequenz sollte funktionieren, wenn es sich nicht um einen CATIA-Bug handelt:

Dim HauptK As Body
Set HauptK = CATIA.ActiveDocument.Part.MainBody
Dim HB As HybridBodies
Set HB = HauptK.HybridBodies
Dim MeinHB As HybridBody
Set MeinHB = HB.Add

Analog kann auch innerhalb eines HybridBody verfahren werden. Mehr Info findest Du im Buch "CATIA V5 - Effiziente Konstruktion mit Makros", S. 65 f.

------------------
Tschüß, Dieter

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

---

Ja, vielen Dank!
Jetzt funktionert es...hätte ich auch irgendwie selber drauf kommen können. *patsch*

Mfg,
Tibby

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