naurel

Salut j'ai planché un peu sur ton problème et j'ai eu du mal avec le filtre. Comme c'est pour faire une selection je me suis focaliser là dessu pour trouver une parade : Selection.Search "(Name=Poly* + Name=Line*), all" dans mon contexte, ça marche, a toi de voir si ça s'adapte bien à ton utilisation. la syntaxe avec le "+" ne marche pas dans : myFilter = "Name=Poly* , all" And "Name=Line* , all" j'espère que ça t'ira. a plus, naurel

content que ça t'ai aidé. :) a plus

je confirme ce que dit gus007 pour le dxf, et qu'il n'existe pas de fonction pour graver sauf avec des logiciels complémentaires.

salut, Apparement tu n'arrives pas à avoir la valeur de Tref1, 2 ou 3. le problème vient donc de TRef(Compteur1).value. J'ai eu un problème similaire. Pour commencer il me semble qu'il faut indiquer le chemin complet : nom_userform.TRef1.value Pour incrémenter ta syntaxe ne me semble pas correct, perso je passerai par une variable intermediaire de type liste : liste (1) = nom_userform.TRef1.value liste (2) = nom_userform.TRef2.value liste (3) = nom_userform.TRef3.value tu peux ensuite facilement incrementer Set myText = myView.Texts.Add(liste(compteur1), -50, Compteur2) voila

Salut, Si tu passe par la fonction symetrie en Assembly alors tu utilises la bonne méthode pour symetriser ta pièce, malheureusement tu obtiendras obligatoirement un corps morts et non la même arborescence que ta pièce de base. Tu n'es pas obliger de garder le lien. Sinon en Part, dans la barre d'outil transformation, tu as 2 outils de symetrie dont 1 correspond à ce que tu veux faire mais il s'agit d'une fonction donc place la au bon endroit dans ton arborescence.Je veux dire que si tu retravaille ce qui est placé avant, ce sera en inversé. naurel

C'est la même utilisation que sous Excel Catia possède un editeur VB qui lui est propre comme Excel, Word et autres. tu passes ce que tu as pu faire en script en VBA, c'est pareil à quelques adaptations près, et tu ensuite peux utiliser les userforms. De mon point de vue (et mon utilisation) VBA ne possède que des avantages par rapport aux deux autres languages scripts. Naurel

Salut, si tu code en script alors non c'est pas possible, il faut utiliser les userforms de MS VB.

Salut, c'est un sujet que l'on retrouve souvent, je ne sais pas si il y a eu une réponse précise donc : drwtexts.GetItem("matiere").InsertVariable 0, 0, ProductDrawn1.Parameters.Item("Matériau") la matière est un paramètre appellé Matériau dans le Part. Pour le lien avec le Part, voir les posts : RECUPERATION DE DONNEES POUR LE REMPLISSAGE DES CARTOUCHES, Prob de cartouche matiere et caractère et autres ... et aussi les scripts des cartouches par défaut. Naurel

Ok Par contre tu aurais pu créer un nouvelle bibliothèque avec ton matériau à l'intérieur comme je te disais au debut. Comme ça tu appelles cette bibliothèque dans ta macro, pour apliquer ton matériau. L'avantage, c'est que tu peut la placer sur le réseau, et l'utiliser partout. Alors que pour l'instant ton matériau n'existe qu'en locale sur ton poste. Naurel

Salut, On est tous à la recherche de la même chose. Personnellement je trouve mon bonheur ici et sur le forum du COE (groupement anglophone de Catia). La bonne nouvelle c'est que probablement tout l'atelier GSD existe en VB. Pour ce qui est des outils de conception de carrosserie, je n'en connais pas. Est-ce que tu travail uniquement sur GSD ou tu peut utiliser Freestyle ou peut etre IMA ? naurel

Ca m'interesse. Est-ce que t'as reussi à créer un nouveau matériau dans une nouvelle bibliothèque ou as-tu modifié un matériau existant comme tu voulais ?

salut, Est-ce que tu arrive a faire ce que tu veux en manuel ? Si oui, est-ce que tu obtiens quelque chose de correct avec l'enregistrement. J'ai jamais fait d'analyse de structure en macro mais ça pourrait m'interesser d'ici quelques mois. naurel

Voila la solution : par défaut le fond de calque est toujours Views.Item(2) Dim DrwView As DrawingView Set DrwView = CATIA.ActiveDocument.DrawingRoot.Sheets.ActiveSheet.Views.Item("Background View"). Ca peut interesser qu'elqu'un.

J'ai vérifier, j'ai pas de soucis avec mes fichiers step, donc ca doit pas venir de la (sauf si ca vient de la conversion d'inventor). Je pense plutot que le problème vient de catia. Il n'y a pas l'air d'avoir d'option concernant la selection. En attendant tu peux essayer de créer des axes dans chaque Part pour t'en sevir en assemblage.c'est pas très propre mais ca dépanne.

euh petite question : qu'est ce que tu lui appliquera comme matériau parceque les tissus organiques ca doit etre bizarre niveau réaction. pour créer un matériau je sais pas trop comment faire mais pour en appliquer un il existe des instructions (ApplyMaterialOn...). Il faut que ton matériau existe dans une bibliothèque. dans la doc y a des infos sur applymaterial naurel

salut, A question simple, solution simple : si tu ne vois que la surface et pas l'axe alors fait un clic droit sur celle-ci > autre selection, y a une fenetre qui apparait pour que tu selectionne la face, l'axe ou tout autre élément associés. Ce qui est étonnant c'est que pour une contrainte de coîncidence dans un assemblage, catia selection de préférence l'axe, si ce n'est pas le cas c'est probablement que ta surface n'en possede pas (elle n'est pas cylindrique, conique ou de révolution). a plus, naurel

re Je n'ai pas le module analyse au boulot et chez moi, je n'ai que GPS donc si c'est juste une piece seul, tu peux, voila mon adresse en litteral : aurelien_ticot(at)hotmail(point)fr decris moi bien le fonctionnement, les charges, liaisons, encastrement, matériau, en fin tout ce que tu sait sur ta structure.

salut, Tout d'abord le module analyse contient plusieurs ateliers, de mémoire GPS, GAS, FMD, GDY, ...mais pour de la vérification, seul GPS et GAS te seront utiles. Autant GPS (analyse piece seul mono-matériau) est dispo par défaut, autant GAS (analyse assemblage) nécessite la P2. Tu peut trouver des tutoriaux : http://ethomit150.free.fr/catia_doc/ . Ca a pas l'air très légale puisqu'ils viennent direct de chez DS mais c'est accessible. a plus, naurel

Salut Personnellement j'ai une copie optimisée pour graver une inscription sur une surface plane. On selectionne la surface où l'on veut l'inscription et la copie op crée un corps de pièce et fait une opération de retrait avec le corps concerné. L'avantage du corps de pièce est qu'il contient un facteur d'echelle pour régler la taille de l'inscription. Pour la position et l'orientation, j'ouvre une esquisse intermédiaire ou je n'ai qu'a deplacer un point et orienter un axe, l'esquisse de l'inscription s'appuie notament sur ce point et cet axe. Ca suffit pour mon usage. Cette méthode peut convenir pour un logo ou une inscription qui revient souvent mais pour une phrase variable c'est pas encore ça. Pour une surface cylindrique, je ne vois qu'une projection puis un retrait mais la projection déforme, ça parait pas fiable. En tout cas c'est un sujet interessant, faudrait que DS l'integre prochainement. a plus, naurel

Petite correction sur ce que j'ai dit sur les set géométriques et conception hybride. lorsque la conception hybride n'est pas activée, les points, droites, plans et surfaces sont crées dans un set géométrique (existant ou pas), les esquisse peuvent etre soit dans un set, soit dans un corps. en conception hybride tous les éléments géométriques peuvent etres crées n'importe où. Pour ton cas, tu as crée des plans dans un set et puisque'il est resté actif tes esquisse se sont caler dedans. La macro a enregistrer cette construction.

re ca vient de tes options Catia. touts tes éléments non volumiques (point, droite, plan, surface...) sont regroupés dans un set geométrique, sauf si la conception hybride est activée, elle s'acctive lors de la création du part ou bien dans les Options > infrastructure Part > document CATPart sinon pour déplacer, je sais pas comment faire à par un couper-coller en revanche plus proprement, lorsque tu crées ton esquisse tu indique l'endroit ou elle sera : ... ... Dim body1 As Body Set body1 = bodies1.Item("Corps principal") ' ici Dim sketches1 As Sketches Set sketches1 = body1.Sketches Dim reference1 As Reference Set reference1 = part1.CreateReferenceFromName(...bla bla bla ...) Dim sketch1 As Sketch Set sketch1 = sketches1.Add(reference1) ... ... fait attention tu es dans un environnement anglais, il ne reconnaitera pas "Corps principal", il faut que tu mettes "PartBody". tu débute sur Catia ? en tout cas bon courage pour la prog autre question, tu programme en script ou en vba ? a plus, naurel.

salut fabientoupeti Je pense que le problème est que tu appelles le "plan.x" car entre guillemets le x n'est pas reconnu en tant que variable mais en tant que lettre. voila qui peut t'interesser : Dim nom_plan As String Dim nb_plan As Integer For x = 1 to nb_plan nom_plan = "plan." & x Set reference1 = hybridShapes1.Item(nom_plan) ... ' creation de l'esquisse.x, etc ... Next Je n'ai pas tester. a plus, naurel

Salut J'ai cherché sur le net et sur ce forum mais je n'ai pas trouvé de réponse à mon problème : comment accéder au calque de fond (pour y intégrer un cartouche) via une macro vba et également comment retourner au calque des vues ensuite ? Voila si quelqu'un à de quoi m'aider, merci d'avance. Naurel

C'est mieux mais ca reste difficile parceque les intersections n'ont pas de coordonnées (normal, puisqu'elles peuvent prendrent d'autres formes qu'un point). Une voie à explorer serait d'utiliser l'outil mesure entre le point d'intersection et l'origine et d'utiliser les composantes x,y et z dans ton draw. Malheureusement je ne sais pas si c'est possible d'utiliser l'outil mesure en VBA Si oui il faudra que tu l'integre à une boucle pour passer en revue tous tes points. j'ai pas trop le temps de m'occuper de ton problème mais si je trouve quelques lignes de code je te tiens au courant.

Salut Est ce que ces points existent ou est ce qu'ils sont à déterminer ?