Export dxf

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 »