---

Hallo,

ich habe ein kleines Problem mit der Aktualisierung, der Befehl Product1.update zeigt in meinem Makro leider keinerlei Wirkung! Das Makro ersetzt eine Komponente in einer Baugruppe durch mehrere Bauteile. Nach jedem Ersetzen wird die Baugruppe unter einem anderen Namen abgespeichert. Das funktioniert auch alles, nur werden die Baugruppen trotz Befehl nicht aktualisiert!
Hier mal die Schleife  des Makros:

(Die Variablen werden vor der Schleife deklariert)

For each oFile in cAllFiles

sFileType = oFile.Type
if(sFileType = "CATIA-Teil") Then

Dim product2 As Product
Set product2 = products1.Item(I)

Dim Pfad as String
Pfad = Arbeitsverzeichnis&oFile.Name

Set Product2 = products1.ReplaceComponent(product2,Pfad,True)

product1.update

Dim ProduktName as String
ProduktName = ExcelObjekt.Worksheets(1).Cells    Variable,2).Value

Dim OutputFile as String
OutputFile =Zielverzeichnis&ProduktName&".CATProduct"

product1.PartNumber=ProduktName

productDocument1.SaveAs (OutputFile)

Variable = Variable + 1

End If

Vielleicht sieht ja einer von euch den Fehler, bin übrigens blutiger Anfänger….

Danke und Gruß
Holger

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

---

Hallo Holger,

du musst das Produkt1 vorher richtig deklarieren.

Set Document = CATIA.ActiveDocument
Set Product1 = Document.Product
Product1.Update

Sollte funktionieren.

Übrigens gibts auch eine Suchfunktion in diesem Forum, die sich lohnt.
Gruß,
Pi

[Diese Nachricht wurde von 3.1415926535 am 12. Nov. 2004 editiert.]

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

---

Hallo,

nein nein, daran liegt es nicht! Das ist schon alles vorher deklariert worden. Heute morgen hatte CATIA sogar einen guten Tag und hat die Aktualisierung vorgenommen, aber nur bei zwei Durchgängen!
Irgendwie wird der Befehl nicht richtig erkannt oder so was in der Richtung! Habe auch schon in den Einstellung rumgespielt. ABER es will nicht so recht!
Bin also weiterhin auf Hilfe angewiesen...
Danke und Gruß
Holger

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