Modification lien drawing -> CATPart

[Invité M-Tecks_EAC]

Bonjour,

Je viens d'écrire quelques lignes qui me permettent d'automatiser la mise à jour d'un cartouche existant issu d'un plan existant, à partir des données exportées de l'ERP. La mise en plan (MEP) est ensuite automatiquement enregistrée. Le but est d'utiliser une MEP existant pour la rechaîner avec une nouvelle pièce. Pour finaliser mon appli, je souhaiterais modifier à partir du script le lien vers le fichier 3D (soit l'équivalent du menu Edition ->Liens -> Documents pointés -> Remplacer). Mais malgré plusieurs tentatives je n'y arrive pas (cf. exemple code ci-dessous). Quelqu'un aurait une solution ou un conseil ?

Merci d'avance.

Fabrice

 

Dim iPartDoc As Document

Set iPartDoc = CATIA.Documents.Open("M:\Données techniques\Part [MTF]\Centreur refroidisseur radiateur.CATPart")

MyViewGenLinks.RemoveAllLinks

MyViewGenLinks.AddLink (iPartDoc)