Enael

Bonjour Voila pour ta petite explication. Je connaissais déjà pas mal ce système mais je suis quand même aller faire un petit tour sur le site d'allopass Tes 10 CHF sont répartie en : 2,55 chf pour les opérateurs 1,35 € pour allopass 3,58€ pour CADxp Oui tu as raison sur le fait qu'en France les opérateur et allpass s'en mettent un peu moins dans les poches mais les donations sont moins importantes aussi enfin voila à toi de voir ce que tu préfères Je n'ai pas regardé les différentes solution de donations que présentait CADxp mais il existe dautres solutions que le paiement à l'acte enfin voila si tu veux des données exacte va voir sur allopass

Perso je ne m'y connais pas encore assez pour tester l'astuce de serge mais je pense que ca peut être très intéressant donc je my pencherai quand j'aurai du temps en espèrant que je comprenne. <acronym class=dict title= Ca a lair compliqué quand on ne connait pas Enael

Voila pour ton petit problème que j'ai rencontré aussi c'est pas compliqué au lieu de faire : Private Sub UserForm_Activate() On Error GoTo Erreur ComboBox1.AddItem "1 bague" ComboBox1.AddItem "2 bagues" ComboBox2.AddItem "par l'avant" ComboBox2.AddItem "par l'arrière" Exit Sub End Sub Tu fais : Private Sub UserForm_Initialize() On Error GoTo Erreur ComboBox1.AddItem "1 bague" ComboBox1.AddItem "2 bagues" ComboBox2.AddItem "par l'avant" ComboBox2.AddItem "par l'arrière" End Sub Et hop toutes les données que tu rentre dans tes combobox ne seront rentrée qu'une et une seule fois peut importe le nombre de fois que tu feras apparaître le userform ou elles sont. C'est un petit truc tout bete mais qui sert beaucoup! Enael

Autrement va voir sur Vbfrance http://www.vbfrance.com/ jai déja vu ce genre de pb dans leur forum et il donnait la solution hélas je men souviens plus désolé. Enael

Pas mal ton idée gawel si elle marche. Perso j'en ai pas l'utilité pour le moment mais c'est toujours bon à savoir ;) Enael PS : Si ca continue, ce site va se transformer en site de code source <acronym class=dict title= :P

Bonjour Peut être devrais-tu mieux expliquer ton problème... parce que la c'est pas très clair. C'est peut être pour ca que tu n'as pas de réponse. Du style, dis ce que tu cherche à faire, avec quel logiciel tu bosses, les fichier que tu utilises, etc Enfin ce n'est que mon humble avis. happy coding Enael

Ah oui j'oubliais : Tu n'es pas oubligé de faire un call pour appeller une procédure, tu peux juste mettre son nom et ca marche aussi bien. Pour une fonction je ne sais pas si ca marche (jamais testé) mais ca doit etre pareil aussi je pense. Voila Enael

Salut Pour ce qui est de ta question sur le mode de fonctionnement des deux types de fonctions, en fait il y a une différence. La solution dont tu parles (gawel) n'est pas une fonction mais une procédure. Tu me diras et alors c'est quoi la différence. Ben la différence est dans el mode de traitement. Pour une procédure, tu peux ou non lui passé des données en paramètres et elle peut ou non te retourner une ouplusieurs variables. La solution de pako est belle et bien une fonction : tu lui passe des données en paramètre et elle te retourne une variable. Bon ca c'est pour le théorie. Moi perso, je ne me sert quasiment jamais des fonctions (enfin jai jamais appris leur utilité) et en utilisant que des procédure ca marche très bien et il me semble que tu as de plus grandes possibilités. Bien sur je peux me tromper et si c'est le cas n'hésitez pas à me le faire remarquer. Enael

Salut Fait gaffe quand tu postes un message <acronym class=dict title=. En fait, enfin je ne sais pas si tu as vu, mais tu n'as même pas besoin de taper le combo change il te suffit de cliquer deux fois sur la combobox et le private sub se crée automatiquement. Pour le moment je nai pas vu de cas où ca ne marchait pas. C'est toujours bon à savoir Voila Enael

Bonjour Niveau clareté, c'est on ne peut plus clair ce coup ci mais hélas je ne pourrais en rien t'aider vu que je ne dévéloppe uniqument en VBA donc voila désolé J'espère que tu trouveras ta réponse. A+ Enael

pas loin <acronym class=dict title= Lycée Pergaud Ville Besançon Il y a 5 ans environ je savais pas que javais un homonyme Enael

Ben ca dépend : C'était quel lycée? Dans quelle ville? Y a combien de temps? Si ca trouve on se connait Enael

Salu gawel C'est un peu hors sujet ce qe je vais dire et je m'en excuse par avance mais quand tu parle de l'adresse couriel tu parle de la mienne? Enael

Salut J'ai ma petiite idée sur ton problème. Tu dis que tu as besoin du nom du fichier pour les méthodes path et fullname en fait oui tu as besoin de nom mais tu peux aussi grugé un peu en passant par le document ouvert dans la fenêtre active pour cela il te suffit de faire : dim toto as document set toto=catia.activedocument voila je pense que ca pourrait résoudre ton problème Enael

Bonjour Désolé je suis parti en vacances sans avoir le temps de répondre à ton problème donc si tu as toujours ce problème, que tu n'as pas réussi à le résoudre, fais moi signe Enael

Bonjour Si ta macro fonction sous une part, il ne devrait poser aucun problème poru qu'elle fonctionne sous un product mais il me sera difficile de t'aider comme ca sans voir ta macro donc si ca te dis envoie la moi ou juste un bout a : guillaumechiron28@hotmail.com voila Enael

Bonjour Pas besoin de se prendre la tete à créer quelques variables! Si j'ai bien compris tu cherches comment crée une variable application CATIA mais cette variable existe déjà dans catia et s'appelle CATIA avec cet objet tu peux executer pas mal d'opération sur catia. Voila je ne sais pas si ca t'a aidé mais si je ne me trompe c'est ce que tu cherchais. Enael

Salut En fait ca dépend si tu parle de cette fonction ou de l'autre. Fonction 1 : o Func GetLength( Product iProduct) As double Returns the length to cut for a member object. Parameters: iProduct The selected structure object Fonction 2 : o Func GetLength( long ii) As Length Role: To get length values useful in some linear sweep types. Parameters: iI Length value index. oElem Length value. return value for CATScript applications, with (IDLRETVAL) function type See also: Length Returns: HRESULT S_OK if Ok E_FAIL else return error code for C++ Implementations See also: HybridShapeFactory Le traitement en fonction de la fonction utilisé differt un peu donc précise stp. Enael

Ha! Catia, Catia, Catia quand tu nous tiens... ... tu nous laches plus. C'est toujours du bonhuer de programmer en VBA sous Catia!! mdr Bonne continuation dans la prise de tête @+ Enael

Je voulais testé ton bout de macro pour essayé de trouver une solution mais hélas je n'ai pas le temps pour le moment car un simple copier coller ne suffit pas <acronym class=dict title= mais surtout que je ne sais pas comment créer des références. Désolé Enael

Ben le problème c'est que le Dimension.value est en lecture seule donc en principe tu peux toujours essayer de lui affecter nimporte quel valeur ca ne changera rien enfin peut être que je me trompe mais en tout cas c'est ce qui est donné dans l'aide Catia. J'ai regardé si on pouvait modifier la distance autrement mais pour le moment je nai pas encore trouver si je trouve je te fais signe. @+ Enael

Pas mal, vu que je suis plus que nul en anglais je n'avais pas penser à ca. J'ai essayer chez moi et ca ne marche pas non plus mais y a de l'idée et surement quelques choses à exploiter. Je vais continuer a faire des teste dessus si j'ai du nouveau ej te tiens au courant. @+ Enael

Salut Rassure toi javais déjà essayé ca aussi mais il me met une erreur du style : Object doesn't support this property or method. Donc je ne vois pas trop coment faire pour cette histoire de sélection mais je me souviens avoir déjà eu ce problème et avoir déjà essayer de le résoudre, seulement je n'avais pas réussi <acronym class=dict title=. Bon ben on va chercher encore Ahh! les joie de Catia :casstet: @+ Enael

C'est vrai que le site de VBFrance grouille de sources et il y a des personne callé dessus mais je n'ai pas encore trop vu de gens parler prog Catia. Ca reste quand même un très bon site pour tout celles et ceux qui veulent faire des progrès en prog ou qui sont coincé en vb. Je vous le conseille tout de même ne serait pour jeté un coup d'oeil sur toutes les sources qu'ils ont : ca vaut le détour. @+ Enael

Ben j'essayer ta méthode dans un peu tout les sens mais j'ai pas encore trouver le bon apparement. Ca marche pas. J'ai essayer ca : Set doc1 = CATIA.ActiveDocument Set part1 = doc1.Part Set bodies1 = part1.Bodies Set body1 = bodies1.Item(1) Set Shape1 = body1.Shapes.Item(2) nam = Shape1.name MsgBox nam Set toto = Shape1.name.Selection on ne peut pas mettre Nam a la place shape1.name dans le Set Toto car Nam n'est pas un objet juste une chaine; Donc voila dis moi ou j'ai fait uen erreur si tu en vois une, stp @+ Enael