Problème macro propriétés masse SolidWorks

Problème macro propriétés masse SolidWorks - VB/VBA/VBS - Programmation

Marsh Posté le 08-04-2009 à 13:39:39    

Bonjour,
 
Dans un programme, je suis amené à récupérer la masse d'une pièce modélisée sous SolidWorks. Mais malgré plusieurs essais de modifications, j'obtiens toujours la même erreur 91 'Variable objet ou variable With non définie'.
Voici la partie du programme :
 
Dim ModelDoc As Object
Dim MassProp As Variant
   
Set swApp = Application.SldWorks
Set Part = swApp.OpenDoc(form_principal.box_repertoire.Value & form_principal.box_valeur_essai.Value & "-Intersections\Intersection" & N_octant & ".SLDPRT", 1)
MassProp = swApp.ActiveDoc.GetMassProperties
form_principal.val_hauteur.Value = MassProp(2)

 
L'erreur est à la ligne : MassProp = swApp.ActiveDoc.GetMassProperties
 
J'ai essayé de rajouter des références et des modifs mais rien n'y fait. Alors si quelqu'un entrevoit la solution, qu'il n'hésite pas !
 
Merci d'avance.

Reply

Marsh Posté le 08-04-2009 à 13:39:39   

Reply

Marsh Posté le 09-04-2009 à 22:16:00    

Salut,
 
je ne connais pas Solidworks, mais il y a quelque chose qui me surprend :
 

Code :
  1. 'Ici tu définis l'objet aplication Solidworks
  2. Set swApp = Application.SldWorks
  3. 'Là, j'ai l'impression que tu ouvres un document solidworks, voire même une pièce dans ce document : Set Part
  4. Set Part = swApp.OpenDoc(form_principal.box_repertoire.Value & form_principal.box_valeur_essai.Value & "-Intersections\Intersection" & N_octant & ".SLDPRT", 1)
  5. 'Ensuite, tu cherches à récupérer le poids... mais de quoi ?
  6. 'MassProp = Application.DocumentActif.PrendrePropriétésMasse.... tu n'indiques pas l'objet ?
  7. MassProp = swApp.ActiveDoc.GetMassProperties
  8. 'Essaye quelque chose comme ça :
  9. MassProp= Part.GetMassProperties
  10. form_principal.val_hauteur.Value = MassProp(2)


 
Sans garantie :D


---------------
OtObOxBlOg - - - Etre seul à avoir tort  c'est plus difficile, mais c'est bien plus beau que d'avoir raison avec une bande de cons
Reply

Marsh Posté le 10-04-2009 à 10:01:06    

A la base ce code n'est pas de moi. Je l'ai récupéré afin d'optimiser la méthode.
 
J'ai été incapable de faire tourner ce truc-là pendant une journée. Et mystérieusement le lendemain, plus le moindre problème pour récupérer la masse de l'objet 3D ...
 
Tu avais bien compris l'action exécutée en tout cas, et j'avoue également que, moi-aussi, certaines choses me surprennent dans ce programme ...
Si ce problème venait à ressurgir, ta proposition serait la première chose que j'essayerais ! Merci.


Message édité par blink-182 le 10-04-2009 à 10:02:08
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed