macro VBA collage spécial d'une publication

Salut,

je cherche à coller une publication faite dans une part1 dans part2 (collage spécial en tant que résultat avec lien) mais je n'arrive pas à le coder et l'enregistreur de macro ne me colle pas la publication.
En fait il s'agit du repère1 créé dans la part1 que je veux utiliser comme référence pour la part2.

Est ce que vous auriez une piste ?

En fait c'est bon j'ai trouvé =D
Je met le bout de code là si ça interesse qqn:

Sub Module()

Dim partDocument1 As PartDocument
Set partDocument1 = CATIA.ActiveDocument

Dim selection1 As Selection
Set selection1 = partDocument1.Selection

selection1.Clear

Dim part1 As Part
Set part1 = partDocument1.Part

Dim axisSystems1 As AxisSystems
Set axisSystems1 = part1.AxisSystems

Dim axisSystem1 As AxisSystem
Set axisSystem1 = axisSystems1.Item("Repère.2")

selection1.Add axisSystem1

selection1.Copy

Dim documents1 As Documents
Set documents1 = CATIA.Documents

Dim partDocument2 As PartDocument
Set partDocument2 = documents1.Add("Part")

Dim part2 As Part
Set part2 = partDocument2.Part

selection1.Add part2
partDocument1.Selection.PasteSpecial ("CATPrtResult")

part2.Update

End Sub

Bonjour Mélanie,

Bienvenue sur le forum et merci de partager tes codes ça peut toujours intéresser d'autres membres.