macro pour donner le nom du p

Bonjour a tous

Je souhaite créer une macro qui définisse le nom du part suivant un paramètre
lorsque que je créer la macro sur une nouvelle autre propriété = a un paramètre cela fonctionne parfaitement

Par contre lorsque je créer la macro sur propriété référence = a un paramètre, il y a un bug: Set parameter1 = parameters1.Item("Part2\Référence")
Cette macro a été réalisée avec l'enregistrement macro

Sub CATMain()

Dim partDocument1 As partDocument
Set partDocument1 = CATIA.ActiveDocument

Dim part1 As Part
Set part1 = partDocument1.Part

Dim relations1 As Relations
Set relations1 = part1.Relations

Dim parameters1 As parameters
Set parameters1 = part1.parameters

Dim parameter1 As Parameter
Set parameter1 = parameters1.Item("Part2\Référence")------------------------------PROBLEME SUR CETTE LIGNE

Dim formula1 As Formula
Set formula1 = relations1.CreateFormula("Formule.3", "", parameter1, "debit ")

formula1.Rename "Formule.3"

End Sub

Merci par avance de votre aide.

bonjour,

Essais : Set parameter1 = parameters1.Item("Référence")


Cdt,

Ps: comment as tu pu faire un enregistrement macro, chez moi ça ne marche pas?


Rpahael

Bonjour Rpahael

J'utilise: Outil / Macro / Démarrer l'enregistrement....
je fais mes paramètres, mes propriétés, mes opérations....
puis : Arrêter l'enregistrement

J'ai eu des problèmes dans l'execution des macros et je me suis aperçu que si je relance la macro avec le même nom de part ou j'avais créer la macro celle ci fonctionne
Donc pour résoudre mon problème, j'ajoute dans le début de la macro une modification du nom
(identique au nom du part lors de l'enregistrement)
cela me permet d'executer sur n'importe quel autre part par la suite

Je pense qu'il y a plus simple lorsque que l'on connaît le langage VBA....

Code:

Set parameter1 = parameters1.Item("Part2\Référence")

marche que si la part s'appelle Part2
a remplacé par :

Code:

Set parameter1 = parameters1.Item(part1.name & "\Référence")

cette ligne:

Code:

formula1.Rename "Formule.3"

ne sert que pour le nom de ta formule
a éviter, si il y a déja une formule qui s'appelle comme ca, sa vas planter ta macro