Erreur d'execution 91

Fermé
Metallicaa Messages postés 14 Date d'inscription mardi 3 juin 2014 Statut Membre Dernière intervention 23 juin 2014 - 10 juin 2014 à 11:28
Bonjour,

Voila, je fait un petite macro afin de modifier des côtes d'un assemblage mécanique. Seulement voila, un message d'erreur s'inscrit lorsque je veux valider un changement de cotes.
Voici ma macro (du moins une partie isolé):

Set swApp = CreateObject("SldWorks.Application")
Set Part = swApp.ActiveDoc

Part.Parameter("D1@Esquisse1@Longueur convoyeur").SystemValue = Range("C2").Value / 1000
Part.ClearSelection
Part.ForceRebuild

End Sub

L'erreur ce situe au niveau du "Part.Parameter("D1@Esquisse1@Longueur convoyeur").SystemValue = Range("C2").Value / 1000"

Merci d'avance =)
ciao