Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Bonjour
Pour info
Le concours commence par des poules / les gagnant vont dans le A et les perdants dans le B d'où la différence de gains
J'ai testé très bien pour l'affichage des le choix de la feuille
Cela fonctionne sur le A j'ai essayé en changeant le nombre d'équipes
Mais sur le B les...
Bonjour
J'ai testé fonctionne sur 128 équipes mais si le chiffre change selon le nombre inscrits reste sur barème 128
Pour les barèmes il me reste 2 feuilles a préparer
Merci pour votre aide
Bonjour
Dans le fichier ci-joint
J'ai une macro rudimentaire qui copie de la feuille de barèmes "Gains 97 128" des cellules vers "97 128 équipes"
Afin de ne pas avoir 36 macros sur cette feuille est il possible d'en faire une qui sélectionne selon le nombre d'équipes
excuser moi si pas trop...
Bonjour
Si cela est possible sur la feuille protégée en cours effacer que les cellules déverrouillées par macro
Dans l'exemple ci-joint code feuille "1"
Merci de votre aide
Bonjour
J'ai testé fonctionne bien
Sauf lorsque l'on quitte l'USF il faut cliquer dans une cellule
Je me suis permis de modifier un peu car la table 2 n'était plus utile
Merci a vous
Bonjour
J'ai un Use forme utile qui fonctionnait dans mes petits programmes club
La structure est la même
Mais dans le nouveau projet la présentation se fait en tableaux donc cela ne s'affiche plus au bon endroit
Si vous voyer la solution
ci-joint un exemple
Merci de votre aide
Bonjour
j'ai testé idéal pour les poules mais toujours le problème sur la macro TricadrageAB non aléatoire en BM ET BP
La partie des poules est faite
Si vous voyer une possibilité de tri aléatoire
Merci a vous
Bonjour
J'ai réussi a bricoler une macro tri qui fonctionne en supprimant les zéros et les blancs mais de A à Z
peut on la modifier pour un tri en aléatoire
Merci
Résultat avec tri A a Z
ActiveWorkbook.Worksheets("33 à 64 équipes").ListObjects("Tableau1").Sort. _
SortFields.Clear
ActiveWorkbook.Worksheets("33 à 64 équipes").ListObjects("Tableau1").Sort. _
SortFields.Add2 Key:=Range("Tableau1[[#All],[Noms]]"), SortOn:= _...