Hab die Lösung. Funktioniert aber erst ab R16.
Set partDocument1 = CATIA.ActiveDocument
Set part1 = partDocument1.Part
Set relations1 = part1.Relations
Set parameters1 = part1.Parameters
p1= CATIA.ActiveDocument.Product.PartNumber & "\Part Number"
Set parameter1 = parameters1.Item(p1)
p2=CATIA.ActiveDocument.Product.PartNumber & "\Properties\XY_NUMBER"
Set formula1 = relations1.CreateFormula("Formula.1", "", parameter1, p2)
formula1.Rename "Formula.1"
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP