Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1210 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  CATIA V5 - Automatiser la fonction search

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

CATIA V5 - Automatiser la fonction search

n°1919951
Dina3419
Posté le 31-08-2009 à 15:33:25  profilanswer
 

Bonjour a tous,
 
 
Je cherche a creer une macro sous VB permettant de choisir des pieces mecaniques (telles que vis, ecrous,...) puis de les cacher.
 
Tout marche tres bien A CONDITION que j'ai deja lance precedement une recherche manuelle grace a la fonction search.
Si je n'ai pas utilise la fonction Search manuellement avant la macro la recherche ne se lance pas. Je suppose qu'il y a quelquechose a activer mais je ne trouve pas quoi.
 
Voici mon code:  
 

Code :
  1. Sub Search
  2. Dim settingControllers1 As settingControllers
  3. Set settingControllers1 = CATIA.settingControllers
  4.                
  5. Dim searchSettingAtt1 As searchSettingAtt
  6. Set searchSettingAtt1 = settingControllers1.Item("CATCafSearchSettingCtrl" )
  7.        
  8. searchSettingAtt1.DeepSearchActivation = True
  9. searchSettingAtt1.Commit
  10. Dim productDocument1 As ProductDocument
  11. Set productDocument1 = CATIA.ActiveDocument
  12. CATIA.RefreshDisplay = False
  13.            
  14. Dim selection1 As Selection
  15. Set selection1 = productDocument1.Selection
  16. ...
  17. selection1.Search "...,all "
  18. Dim selection2 As Selection
  19. Set selection2 = productDocument1.Selection
  20.    
  21. Dim visPropertySet1 As VisPropertySet
  22. Set visPropertySet1 = selection2.VisProperties
  23. visPropertySet1.SetShow 1
  24. selection2.Clear
  25. End Sub


 
Quelqu'un aurait-il une idee de ce qui manque pour que la macro marche sans devoir lancer une recherche au demarrage ?
Merci d'avance

mood
Publicité
Posté le 31-08-2009 à 15:33:25  profilanswer
 

n°1920988
Dina3419
Posté le 03-09-2009 à 17:04:42  profilanswer
 

Probleme resolu.
 
Solution: CATIA.StartCommand "Search"

n°1921556
otobox
Maison fondée en 2005
Posté le 05-09-2009 à 20:08:19  profilanswer
 

Les utilisateurs de Catia ne sont pas très nombreux, tu avais peu de chances de tomber sur quelqu'un qui puisse t'aider.
Mais c'est très sympa d'avoir donné la réponse à ton problème :)
Je suis un utilisateur d'AutoCAD et parfois je cherche aussi des solutions à des problèmes que je rencontre avec mes macros en vba. La communauté des utilisateurs étant aussi assez réduite (y'en a plus que sur Catia mais beaucoup moins que sur Excel :D) c'est toujours agréable de tomber sur un post tel que le tiens qui apporte une réponse :jap:


---------------
OtObOxBlOg - - - Etre seul à avoir tort  c'est plus difficile, mais c'est bien plus beau que d'avoir raison avec une bande de cons
n°1922236
Dina3419
Posté le 08-09-2009 à 15:54:37  profilanswer
 

Quel soulagement de trouver une reponse apres des jours de recherche sur la toile, si je peux eviter ca a qqun tant mieux ;)
 
Un utilisateur m'a aide sur un des forums de http://www.eng-tips.com que je te conseille si tu ne le connais pas !


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  CATIA V5 - Automatiser la fonction search

 

Sujets relatifs
PHP - fonction escapeshellcmd()Fonction pour établir le classement d'un coureur
[VBA] Programmer un indicateur coloré en fonction d'une valeurfonction SQL qui fonctionne impec sous phpmyadmin mais pas en php !
Fonction window.open (javascript)Allocation d'un tableau dans une fonction
[Batch]Ajout de fonction Windowsaccès à fonction importée à accè à fonction importé.
Fonction mail OK en ligne de commande php, KO par le WebFonction qui retourne une structure
Plus de sujets relatifs à : CATIA V5 - Automatiser la fonction search


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR