CATIA V5 | 3DEXPERIENCE
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
Le Deal du moment :
Fnac : 2 jeux de société achetés ...
Voir le deal

macro module EHI: récuperer le nom de ma sélection

3 participants

Aller en bas

macro module EHI: récuperer le nom de ma sélection Empty macro module EHI: récuperer le nom de ma sélection

Message par xorman Mer 19 Nov 2014 - 12:00

Bonjour
Dans CATIA, je sélectionne un élément dans l'arbre, et je voudrais récupérer son nom dans une variable string.
cliquez sur le lien pour voir l'image
macro module EHI: récuperer le nom de ma sélection 134505

Sub CATMain()

Dim productDocument1 As ProductDocument
Set productDocument1 = CATIA.ActiveDocument

Dim selection1 As Selection
Set selection1 = productDocument1.Selection

Debug.Print selection1.Item(1).Value.Name
me donne l'instance de la Part mais je n'arrive pas a récupérer le nom de l'élément sélectionné
xorman
xorman
actif
actif

Messages : 99
Date d'inscription : 05/09/2008
Age : 48
Localisation : Cherbourg

http://www.myimpression3d.com

Revenir en haut Aller en bas

macro module EHI: récuperer le nom de ma sélection Empty Re: macro module EHI: récuperer le nom de ma sélection

Message par ramzar Mar 25 Nov 2014 - 21:51

Salut, est ce que tu veux récupéré le nom du élément dans un product? Donc un part? Ou est-ce que c'est un sous-assemblage. Et que veux-tu faire avec le nom (selection1)Question Si tu peux mettre une photo de ton arbre sa pourrait etre plus facile aussi!

ramzar
timide
timide

Messages : 10
Date d'inscription : 12/09/2014
Localisation : Canada

Revenir en haut Aller en bas

macro module EHI: récuperer le nom de ma sélection Empty Re: macro module EHI: récuperer le nom de ma sélection

Message par xorman Mer 26 Nov 2014 - 8:34

Il faut cliquer sur le texte "Cliquer le lien pour voir l’image".


xorman
xorman
actif
actif

Messages : 99
Date d'inscription : 05/09/2008
Age : 48
Localisation : Cherbourg

http://www.myimpression3d.com

Revenir en haut Aller en bas

macro module EHI: récuperer le nom de ma sélection Empty Re: macro module EHI: récuperer le nom de ma sélection

Message par Guss_ Mer 26 Nov 2014 - 11:01

Comment tu utilises ton code?

Tu sélectionnes et ensuite tu lances ta macros ?



Car pour mois ce code à l'air de fonctionner
Code:

    Dim selection1 As Selection
    Set selection1 = CATIA.ActiveDocument.Selection
   
    Debug.Print selection1.Item(1).Value.Name

Guss_
Admin
Admin

Messages : 530
Date d'inscription : 08/01/2010

Revenir en haut Aller en bas

macro module EHI: récuperer le nom de ma sélection Empty Re: macro module EHI: récuperer le nom de ma sélection

Message par xorman Mer 26 Nov 2014 - 14:45

oui je sélectionne et je lance la macro.
le code fonctionne, mais cela me donne l’instance de la part (ensemble segment de harnais 14.1)
xorman
xorman
actif
actif

Messages : 99
Date d'inscription : 05/09/2008
Age : 48
Localisation : Cherbourg

http://www.myimpression3d.com

Revenir en haut Aller en bas

macro module EHI: récuperer le nom de ma sélection Empty Re: macro module EHI: récuperer le nom de ma sélection

Message par Guss_ Mer 26 Nov 2014 - 15:25

Il y a quelque temps j'avais fait une macro qui permettait de sélectionner une part
C'est une fonction il faut l'appeler avec les parmametre qu'il faut

Code:

Function select_(texte As String, type_ As String) As Object ' fonction séléctionant un porduit

        Dim EnableSelectionFor(0), UserSelection, message, selection, sel
    
    EnableSelectionFor(0) = type_
    Set selection = CATIA.ActiveDocument.selection
    selection.Clear
    MsgBox texte
    UserSelection = selection.SelectElement2(EnableSelectionFor, texte, False)
    
    
    If UserSelection <> "Normal" Then
        message = MsgBox("Erreur avec la sélèction!", vbCritical, "Error")
        End
    Else
        Set sel = selection.Item(1)
        Set select_ = sel.Value 'retourne la part séléctioner
    End If
End Function

On appelle la fonction de cette manière
select_(texte de la boite de dialogue , type d'objet à séléctioner )


Dans l'exemple je veux séléctoner une part
Code:

    Dim Produit_selection
    Set Produit_selection = select_("selectionez une Part", "Part")



Ensuite tu dois pouvoir faire


Code:
debug.print Produit_selection.name

Guss_
Admin
Admin

Messages : 530
Date d'inscription : 08/01/2010

Revenir en haut Aller en bas

macro module EHI: récuperer le nom de ma sélection Empty Re: macro module EHI: récuperer le nom de ma sélection

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum