---

Forum01.jpg Forum02.jpg

Hi zusammen,

ich habe das Problem, die Instance IDs einer Produktstruktur umbenennen zu wollen. Das geht normalerweise nur eine Ebene unter dem Root-Knoten eines geöffneten Fensters.

Wie gehe ich allerdings vor, wenn ich die Instance IDs von Knoten umbenennen möchte, die in einer Komponente verbaut sind? Diese Knoten liegen zwangsweise immer auf der zweiten Ebene des Baumes.

Zur Veranschaulichung habe ich zwei Bilder und ein Makro eingefügt. Das erste Bild (Forum01.jpg) zeigt den Baum vor dem Lauf des Makros, das zweite nach dem Lauf (Forum02.jpg). Ich möchte auch die Instance ID von "P3" umbenennen.

Wie geht das? Das Makro selbt bringt keine Fehlermeldung.

Hier mein Code:

Sub CATMain()

CATIA.ActiveDocument.Product.PartNumber = "P1"

CATIA.ActiveDocument.Product.Products.Item(1).PartNumber = "P2"
CATIA.ActiveDocument.Product.Products.Item(1).Name = "P2"

CATIA.ActiveDocument.Product.Products.Item(1).Products.Item(1).PartNumber = "P3"
CATIA.ActiveDocument.Product.Products.Item(1).Products.Item(1).Name = "P3"

End Sub

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

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

---

Hallo Dieter,

probiere mal folgendes:

Sub CATMain()

Dim MyProduct As Product
Set MyMainProduct = CATIA.ActiveDocument.Product
MyMainProduct.PartNumber = "P1"

Dim MyPartProduct1 As Product
Set MyPartProduct1 = CATIA.ActiveDocument.GetItem("Product1")
MyPartProduct1.PartNumber = "P2"

Dim MyMainProducts As Products
Set MyMainProducts = MyMainProduct.Products
Dim MyInstanceProduct1 As Product
Set MyInstanceProduct1 = MyMainProducts.Item("Product1.1")
MyInstanceProduct1.Name = "P2"

Dim MyPartProduct2 As Product
Set MyPartProduct2 = CATIA.ActiveDocument.GetItem("Product3")
MyPartProduct2.PartNumber = "P3"

Dim MySubProducts As Products
Set MySubProducts = MyPartProduct1.Products
Dim MySubInstanceProduct1 As Product
Set MySubInstanceProduct1 = MySubProducts.Item("Product3.1")
MySubInstanceProduct1.Name = "P3"

End Sub

Hat bei mir funktioniert. Du solltest evtl. den Baum manuel zu und wieder aufklappen, um die Änderungen zu sehen.

Ich habe die Makroaufnahme zu Hilfe genommen. So wie es aussieht sollte man die methode GetItem() verwenden um den Part Name zu ändern und die Methode Item() um den Instance Name zu ändern. Frage mich nicht warum!

------------------
MfG Banka.

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

---

Hi Banka,

vielen Dank, es hat funktioniert!!!!

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

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