Hallo,
ich habe in einem Product zwei Instanzen eines Parts, welche im Product an verschiedenen Stellen Positioniert wurden.
Jetzt möchte ich jeweils ein Element aus den beiden Instanzen in ein anderes Part als Result ohne Link kopieren.
Product
--Part1 (Quelle Instanz1)
--Part1 (Quelle Instanz2)
--Part2 (Ziel)
wenn ich das so kopiere:
Code:
For i = 0 To UBound(mStart.MyProductItems)
MyRootSelection.Clear
MyRootSelection.Add mStart.MyProductItems(i).ReferenceProduct.Parent.Part.FindObjectByName("PASSIVE_HAERTEBEREICHE")
MyRootSelection.Copy
MyRootSelection.Clear
MyRootSelection.Add MyActPart
MyRootSelection.PasteSpecial "CATPrtResultWithOutLink"
next
werden die Elemente kopiert, liegen aber beide auf der Position der ersten Instanz.
Wenn ich die Elemente so kopiere:
Code:
For i = 0 To UBound(mStart.MyProductItems)
MyRootSelection.Clear
MyRootSelection.Add mStart.MyProductItems(i)
MyRootSelection.Search "(Name=PASSIVE_HAERTEBEREICHE & (((CATStFreeStyleSearch.OpenBodyFeature + CATPrtSearch.OpenBodyFeature) + CATGmoSearch.OpenBodyFeature) + CATSpdSearch.OpenBodyFeature)),sel" MyRootSelection.Copy
MyRootSelection.Clear
MyRootSelection.Add MyActPart
MyRootSelection.PasteSpecial "CATPrtResultWithOutLink"
next
werden die Elemente richtig kopiert und liegen auch jeweils an der richtigen Stelle.
Meine Frage wäre:
Gibt es eine andere/saubere Möglichkeit die Elemente, mit der richtigen Lage, aus denjeweiligen Instanzen zu kopieren ohne die "Search" Funktion zu benutzen?
Vielen Dank
mfG
Mario
------------------
Wenn das die Lösung sein soll,
will ich mein Problem zurück !!
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP