Cartouche

Code:


Set partDocument1 = CATIA.ActiveDocument         
Set documents1 = CATIA.Documents               
Dim product1 As CATBaseDispatch
Set product1 = partDocument1.GetItem("1")                                       
Nom = product1.PartNumber

Dim parameters1 As Parameters
Set parameters1 = product1.UserRefProperties
Set product1 = product1.ReferenceProduct
Set part1 = partDocument1.Part   
Dim strParam1 As Parameter
Set strParam1 = parameters1.Item("`Propriétés\Numéro d'étude`")


ce qui permet de recupérer les nom de la pièce et une propriété appelé Numéro d'étude.

Attention flo le GetItem ne marche pas à tous les coups !
Je me suis déjà fait avoir

pour être honnête, je sais pas a quoi il sert, mais sinon, si le code ne marche plus, tu le remplacerai par quoi ?

je vais essayer ce code
merci

bonjour a tous
j'ai pas eu le temps de essayer de reecrire un code
j'ai changer de travail.
j'espere pouvoir prendre un peu de temps pour essaye