Bonjour,
Je réalise ma première VBA et franchement je galère un max...
Je dois a l'aide d'une macro sous excel paramétrer les cotes d'un assemblage sur Solidworks.
Voici ma macro:
Sub Bouton1_Clic()
Set swApp = CreateObject("SldWorks.Application")
Set Part = swApp.ActiveDoc
Part.Parameter("D4@Esquisse1@Longueur").SystemValue = Range("C2").Value / 1000
Part.ClearSelection
Part.ForceRebuild
Part.Parameter("D1@Extru.-Mince1@Largeur").SystemValue = Range("C4").Value / 1000
Part.ClearSelection
Part.ForceRebuild
End Sub
Je n'est pour le moment rentré que deux critères: longueur et largeur.
Le message d'erreur est le suivant:
Erreur d'execution 91
Erreur d'execution 1004
Merci d'avace
Partager