CATIA V5 - Automatiser la fonction search

Marsh Posté le 31-08-2009 à 15:33:25

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 :

Sub Search
Dim settingControllers1 As settingControllers
Set settingControllers1 = CATIA.settingControllers
Dim searchSettingAtt1 As searchSettingAtt
Set searchSettingAtt1 = settingControllers1.Item("CATCafSearchSettingCtrl" )
searchSettingAtt1.DeepSearchActivation = True
searchSettingAtt1.Commit
Dim productDocument1 As ProductDocument
Set productDocument1 = CATIA.ActiveDocument
CATIA.RefreshDisplay = False
Dim selection1 As Selection
Set selection1 = productDocument1.Selection
...
selection1.Search "...,all "
Dim selection2 As Selection
Set selection2 = productDocument1.Selection
Dim visPropertySet1 As VisPropertySet
Set visPropertySet1 = selection2.VisProperties
visPropertySet1.SetShow 1
selection2.Clear
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

Reply

Marsh Posté le 31-08-2009 à 15:33:25

Reply

Marsh Posté le 03-09-2009 à 17:04:42

Probleme resolu.

Solution: CATIA.StartCommand "Search"

Reply

Marsh Posté le 05-09-2009 à 20:08:19

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 ) 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

Reply

Marsh Posté le 08-09-2009 à 15:54:37

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 !

Reply

CATIA V5 - Automatiser la fonction search

Sujets relatifs:

Leave a Replay