allo groupe,
Est-ce que quelqu'un pourrait me conseiller sur la faisabilité d'une macro. Je travaille avec les mécano souder et j'aimerais sélectionner une face, ensuite, que la macro puisse faire les étapes suivantes:
1-conserver la surface sélectionné
2- retrouver le nom de mon répertoire dans ma liste de mecano souder en fonction de la surface sélectionné. (J'imagine que je dois rechercher en fonction du corps et nom de la surface mais est-ce que je peux retrouver facilement le corps avec la surface)
3- exporter en dxf la surface avec le nom de mon répertoire
Je crois que c'est possible mais je suis pas très callé en programmation, avant de me lancer, j'aimerais avoir vos commentaires.
merci
Bonjour.
Pour le point 1. Ci dessous un code que j'utilise pour récupérer un composant mais qui passe par cette étape.
Public swApp As Object
Public swmodel As SldWorks.ModelDoc2
Public asm As SldWorks.AssemblyDoc
Public composants() As Object
Public Selectmanager As SelectionMgr
Public bool1 As Boolean
Public y As Double
Public face As Face2
Public faceEntity As Entity
Public oss As String
Set swApp = Application.SldWorks
Set frame = swApp.frame
Set swmodel = swApp.ActiveDoc
swmodel.ClearSelection2 True
Set Selectmanager = swmodel.SelectionManager 'recuperer selection
swmodel.ClearSelection2 True ' effacer selection
MsgBox ("Sélectionner la piece ")
' boucle pour attente selection
bool1 = False
Do Until bool1 = True
If Selectmanager.GetSelectedObjectType3(1, -1) = 2 Then
bool1 = True
End If
For y = 1 To 50000
DoEvents
Next y
Loop
'recup le nom de la piece selectionnée
Set face = Selectmanager.GetSelectedObject6(1, -1)
Set faceEntity = face
Puis pour le point 2 je dois avoir un bout de code au besoin il faut que je recherche.
A voir si le point 3 est faisable jamais eu ce cas de figure.
En espérant que cela puisse t'aider.
A. Mendes
1 « J'aime »