Contenu récent par mécano41

Bonjour, .... With Graph With .Parent .Width = Larg + 10 .Height = Haut + 10 End With With .PlotArea .Left = 0 ... etc Là, c'est bon. Merci. Cordialement

Effectivement...je n'avais pas compris. J'ai corrigé. Cela fonction sauf la partie entre lignes de ' ########### Si j'inhibe ces lignes, pas de problème... Cordialement

Désolé, je n'y arrive pas ..."incompatibilité de type" dès l'appel... Je joins le nouveau fichier. Cordialement

Merci, je regarde et je reviens.... Cordialement

Voici un fichier très allégé. Les parties intéressantes du code sont limitées par des ' ############## Le but : pouvoir récupérer des procédures complètes dans d'autres fichiers sans les modifier. Les cellules jaunes de la feuille Calculs sont modifiable pour lancer les calculs et actions Merci...

Bonjour, Merci d'avoir répondu. Je suis justement en train de simplifier un fichier pour le mettre ici...:) Cordialement

Bonjour, J'ai un petit souci dans mon code. Je souhaite lancer une procédure par un Call Sub xxxx( ici : arguments nécessaires) Les éléments se trouvent dans plusieurs feuilles et je souhaite que le Sub xxxx(...) n'ait pas à connaître les noms de feuille de façon à pouvoir le réutiliser...

oui, merci. J'en ai beaucoup dans l'un des modules. Cordialement

Bonjour, Merci, cela a l'air de fonctionner. Il me semble avoir essayé comme cela mais il devait y avoir quelque chose ailleurs qui n'allait pas bien... Pour l'image différente, c'est normal ; je l'ai faite avant d'anonymiser les tableaux. Encore merci. Cordialement

Bonsoir. Merci. Voici un fichier de l'appli., anonymisé. C'est un peut lourd mais je ne vois pas comment faire un exemple... Une bizarrerie : je pense ne rien avoir modifié dans le code mais maintenant ce que j'ai écrit ne s'applique plus au Nom mais au Prénom!!! mais le problème est...

Bonjour, Ci-joint, l'image de deux USF (à un instant donné). Un bouton ouvre le premier (BdDlg3). Dans celui-ci, je choisis dans la liste "Villas". La D1 par ex. me rend 2 noms (souvent, il n'y en a qu'un). Je dois en sélectionner un et transférer les éléments dans les trois TextBox du second...

Bonjour, Je vois une anomalie mais comme c'est une copie d'écran, je ne peux pas en trouver l'origine (il y a peut-être eu une modification intempestive de l'appli. lors de tes manips...normalement elle est protégée mais bon...) J'ai reessayé en utilisant bien le fichier qui est sur le forum...

Bonsoir, J'ai mis tes valeurs dans l'appli : R0 1300 mm Hv 3250 mm H 504 mm R2 260 mm R1 c'est le rayon du fond. Je ne le connais pas. Comme je n'ai pas trouvé de fond de diamètre 2600, j'ai mis au pif un rayon de 4000. Je n'ai pas d'erreur. Si je mets dans la cellule E45 une hauteur de...

Bonjour, Il faudrait donner tes dimensions afin que je puisse les saisir et vérifier ce que cela donne... Pour info. : le lien du site fournisseur de fonds est maintenant : https://fondeyur.com/fr/ Cordialement

Regarde ce fichier que j'avais fait pour simuler un porte-outils d'alésage particulier. Il permet plus de choses. Tu peux voir, dans le tableau de Définition des formes, que les valeurs sont soit reportées de points déjà définis au-dessus (ou en dessous) dans ce même tableau, soit importées de...