Hi Hanni05,
wenn Du in der Produktstruktur ein CATPart erzeugt hast, kannst Du auch das Objekt des zugehörigen Dokumentes (z.B. MeinDoc) finden. Hast Du das Dokument definiert, sollte die Erzeugung eines OpenBodies wie folgt funktionieren:
Dim HB As HybdridBodies
Set HB = MeinDoc.Part.HybridBodies
Dim NeuerHB As HybridBody
Set NeuerHB = HB.Add
NeuerHB.Name = "Mein neuer HB"
Mehr dazu findest Du im Buch "Effiziente Konstruktion mit Makros", S. 62 ff.
------------------
Tschüß, Dieter
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP