macro VBA collage spécial d'une publication

Aller en bas

R?solu macro VBA collage spécial d'une publication

Message par mélanie le Mar 19 Juin 2018 - 20:05

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 ?

mélanie
timide
timide

Messages : 3
Date d'inscription : 15/06/2018
Localisation : marseille

Revenir en haut Aller en bas

R?solu réponse à moi-même

Message par mélanie le Mar 19 Juin 2018 - 21:14

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

mélanie
timide
timide

Messages : 3
Date d'inscription : 15/06/2018
Localisation : marseille

Revenir en haut Aller en bas

R?solu Re: macro VBA collage spécial d'une publication

Message par lumpazepfel le Jeu 21 Juin 2018 - 22:30

Bonjour Mélanie,

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

Messages : 167
Date d'inscription : 03/11/2015
Localisation : Ensisheim

Revenir en haut Aller en bas

R?solu Re: macro VBA collage spécial d'une publication

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum