Formules ou macro
Résolumic6259 Messages postés 371 Statut Membre -
Quelqu'un peut-il me concocter une macro pour afficher dans Q2(Horizontale) le n° dans la colonne A, qu'aprés avoir cliquer sur Nouvelle partie sinon rien ne s'affiche dans H2 puis Nouveau tirages simultanés quand apparait dans Gagnant de G2 a G716 le chiffre 1.
Même chose pour R2(2 Horizontales) quand apparaît dans Gagnant de G2 a G540 le chiffre 2.
Même chose pour S2(Verticale) quand apparaît dans Gagnant De H2 a H540 le chiffre 1.
Même chose pour T2(2 Verticales) quand apparaît dans Gagnant de H2 a H540 le chiffre 2.
Même chose pour U2(1 Diagonale) quand apparaît dans Gagnant de I2 a I540 le chiffre 4.
Même chose pour V2(2 Diagonales) quand apparaît dans Gagnant de J2 a J540 le chiffre 8.
Même chose pour W2(1 Diagonale) quand apparaît dans Gagnant de K2 a K540 le chiffre 4.
J'ai mis une pièce jointe
Si vous voulez vous pouvez modifier la macro existante pour le tirage.Je l'ai trouvé dans le forum.
J'espère que vous allez comprendre mon exposé.
Merci de votre aide qui me sera précieux.
https://www.cjoint.com/c/ECnuyA2S8Gg
- Formules ou macro
- Formule si ou - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Formules - Télécharger - Études & Formations
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Jitbit macro recorder - Télécharger - Confidentialité
8 réponses
Le besoin porte sur une macro Excel qui affiche dans Q2, R2, S2, T2, U2, V2 et W2 les numéros de grille correspondants après l’activation d’une nouvelle partie et selon les codes de gain présents dans la feuille Gagnant (1, 2, 4, 8 selon l’orientation).
Une solution fonctionnelle proposée consiste en une macro nommée gagnants qui parcourt la feuille Gagnant par blocs, récupère les numéros de grille lorsque les repères H, HH, V, VV, DD, 2D, DG apparaissent, et écrit les résultats concaténés sur la feuille Jeu dans les cellules R2 à R9.
Pour étendre le fonctionnement, il est envisageable de dupliquer la macro (par exemple sous Gagnant1) et de l’enchaîner après la première, avec un bouton Nouvelle Partie qui réinitialise les données pertinentes.
Enfin, il est discuté d’optimiser l’affichage pour un grand nombre de grilles (600+) en plaçant les résultats sur une autre feuille et en ajustant les adresses des cellules pour limiter la largeur du tableau dans Jeu.
une macro pour afficher dans Q2(Horizontale) le n° dans la colonne A, qu'aprés avoir cliquer sur Nouvelle partie sinon rien ne s'affiche dans H2 puis Nouveau tirages simultanés quand apparait dans Gagnant de G2 a G716 le chiffre 1
Rien compris !
Peux tu réexpliquer avec un exemple précis ?
Cdlmnt
Comme dit via55 (salut à toi), difficile de comprendre ce que tu veux
Peux tu décrire une séquence sous la forme
Nouvelle partie
nouveau tirage
le n° sorti est 56
ce n° apparait dans la feuille gagnant dans plusieurs "cartons" 2-5-9 ...
seul le carton n° 2 est marqué par deux 1 (DD et 2D)
Et là, que fait on ? expliques ....
On fait nouveau tirage
Que doit il se passer, expliques .....
RQ. Au passage, est ce que numax garde toujours la valeur 75 ? Si oui, on peut faire le remplissage de la feuille Jeu via (pas 55 cette fois ;-) la macro
Cdlmnt
Salut ccm :)
Sans plus d'explication, avec ce que j'ai pu comprendre tout seul une proposition avec formules pour déterminer les gagnants et macro pour ne plus comptabiliser les résultats acquis aux prochains coups et remise à zéro pour nouvelle partie
https://www.cjoint.com/?0CowpsSQDCy
Cdlmnt
Merci de vous occuper de mon problème, c'est ce que je cherche et çà marche très bien, mais un petit problème surviens quand J'efface certaine cellules et que je choisi les grilles dans la colonne A de 7 a 12 par exemple(toutes les autre sont vides), après tirage le programme m'affiche une erreur dans un cadre Fin Débogage , quand je clique sur Débogage je suis dans la macro en bleu une certaine commande suivi de 2, 23.
Serrait-il possible de corriger en sachant que j'ai d'autre grilles a mettre(j'en ai 600).
Je ne suis pas fort en VBA ni en formule, mais j'essai de comprendre et de modifier quand je le peut.
Merci beaucoup de votre aide
Quelles cellules effaces-tu ?
Comment choisit-tu certaines grilles et pourquoi les autres sont vides ?
Je ne comprends pas le bug avec si peu d'infos
car en principe la macro recherche dans la colonne A de Gagnant les n°s qui s'affichent de G2 à W2 de Jeu; mais ces n°s ne s'affichent qu'en fonction des formules des colonnes H à U de Gagnant qui ne renvoient un résultat que lorsqu'une grille est gagnante
Si tu as au final 600 grilles cela ne posera de problèmes mais veux tu dire que certaines grilles ne seront pas utilisées ? Comment dans ce cas tu indiqueras celles qui le sont et celles dont il ne faut pas tenir compte
Dans l'attente de ces précisions et de toutes les autres que tu jugeras bon pour avancer.Si on a toutes les données de la problématique dès le début c'est quand même plus facile que de faire du rafistolage après coup !
Cdlmnt
Pourquoi effacer manuellement des cellules ? je ne comprends pas l'intérêt ?
Et tu ne réponds pas à mes questions précises, on ne peut pas avancer comme ça!
Je te repose donc la question autrement :
Dans Gagnant tu vas avoir toutes les grilles possibles avec leur n° en colonne A, OK, faut-il prévoir que certaines grilles soient mises hors course à un moment ?
Dans ce cas il ne faut pas effacer mais prévoir une colonne pour valider ou telle ou telle grille
Dans l'attente
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionet ensuite de savoir si son carton a gagné mais pas celle que l'on a pas choisis.
Par contre je suis d'accord pour prévoir une colonne avec les grilles choisis mais je ne sais pas comment faire.
Merci beaucoup
Plus clair!
Où veux tu valider les grilles choisies pour jouer ?
Dans la feuille Gagnant ou dans le feuille Jeu ?
Je vois que le sujet a bien évolué depuis .... peux tu mettre un exemplaire du fichier bingo-4 au format excel 2003
merci et bonne journée à tous les deux
Voilà : mais j'ai eu le message de non compatibilité concernant certaines formules !
https://www.cjoint.com/?0CqlTbows2G
Bonne journée également
De Q2 a W2 rien ne s'affiche par contre après la fin du tirage dans X2 affiche 1 dans le fichier joint.
Merci
https://www.cjoint.com/c/ECqmYABqvo5
Prends la bonne version : https://www.cjoint.com/?0CqozuoJ8cc
Je m'absente cet après-midi, si un autre souci je regarderai ce soir
Cdlmnt
Je vais voir ce que je peux faire avec les formules non compatibles 2003
Bon après midi
Nouvelle version,(en 2007 : https://www.cjoint.com/?0CqtYk3OttD
nouvelle formule :
=SI(G2="NON";"0";SI(ET(H2=1;H3="");"H";SI(ET(I2=2;I3="");"HH";SI(ET(J2=1;J3="");"V";SI(ET(K3="";K2=2);"VV";SI(M2=8;"2D";SI(ET(L2=4;L3="");"DD";SI(ET(N2=4;N3="");"DG";""))))))))
Bien cdlmnt
J'ai mis les formules à la sauce excel 2003, en fait, il suffit d'intégrer G2="OUI" dans chaque condition ce qui ramène le nombre de SI imbriqués au maxi fatidique (il y a des jours comme ça)
Ton dernier lien est inactif, donc pas vu mais au cas ou, je le préfèrerai sous excel 2003
Bon après midi
Je ne comprends pas pourquoi le lien n'est plus actif
Voilà le dernier fichier au format 2003, j'ai modifié les formules selon ton conseil
https://www.cjoint.com/?0CrqGmdlNw1
Bon après-midi également
Voilà le bon mais de nouveau problème de trop de SI
formule qui fonctionne sous 2007 ;
=SI(ET(H2=1;H3="";G2="OUI");"H";SI(ET(I2=2;I3="";G2="OUI");"HH";SI(ET(J2=1;J3="";G2="OUI");"V";SI(ET(K3="";K2=2;G2="OUI");"VV";SI(ET(M2=8;G2="OUI");"2D";SI(ET(L2=4;L3="";G2="OUI");"DD";SI(ET(N2=4;N3="";G2="OUI");"DG";"")))))))