XL 2019 Modification Tableau tournoi

  • Initiateur de la discussion Initiateur de la discussion leims
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

leims

XLDnaute Nouveau
Bonjour,

J'ai trouvé un tableau pour notre tournoi de rugby (je vais le modifier pour) sur votre site.
Tournoi de 16 équipes avec 4 poules avec des enfants de moins de 12 ans.
Je le joint en pièce jointe.
Il est très bien sauf au niveau des matchs.
Quand on lance les équipes, l'équipes 1 joue c'est 3 premier match de suite et je souhaiterais que la même équipe n'enchaine pas ces matchs les uns à la suite de l'autre.
Si vous pouviez le modifier, cela serait super.
Je n'est que de petites bases en excel (excel 2019), c'est pour ça que je fais appel à vous.
Merci.
 

Pièces jointes

Bonjour Leims,
Un essai en PJ. Plutôt que de me plonger dans tout le code, j'ai rajouté un petit patch qui mélange les équipes à la fin, avec :
VB:
Sub MelangeEquipe()
IndexM = Array(1, 13, 2, 9, 3, 8, 12, 4, 10, 5, 6, 14, 11, 7, 15)
With Sheets("Tournoi")
    tablo = .[F5:G19]
    For i = 0 To 14: Cells(5 + i, "F") = tablo(IndexM(i), 1): Cells(5 + i, "G") = tablo(IndexM(i), 2): Next i
    tablo = .[F22:G36]
    For i = 0 To 14: Cells(22 + i, "F") = tablo(IndexM(i), 1): Cells(22 + i, "G") = tablo(IndexM(i), 2): Next i
    tablo = .[F39:G53]
    For i = 0 To 14: Cells(39 + i, "F") = tablo(IndexM(i), 1): Cells(39 + i, "G") = tablo(IndexM(i), 2): Next i
    tablo = .[F56:G70]
    For i = 0 To 14: Cells(56 + i, "F") = tablo(IndexM(i), 1): Cells(56 + i, "G") = tablo(IndexM(i), 2): Next i
End With
End Sub
J'ai essayé de trouver le mélange le plus équilibré.
1634909886798.png

Il y a au moins un match "de repos" entre 2 match pour chaque équipe.
 

Pièces jointes

C'est presque ça, juste que les équipes de chaque poules doivent rester entres elles.
4 premières équipes en poule 1 entres elles mais pas deux match d'affilés.
Pareil pour les autres poules.
Evidemment, il y a obligatoirement une équipe qui devrait jouer 2 fois de suite par poule.
Merci de te pencher sur mon problème.
Bon week-end
 
??? C'est bien le cas de la PJ. Vous l'avez ouverte ?
1634913409854.png

Si c'est le tableau qui vous a perturbé, je voulais juste montrer qu'une équipe ne jouait jamais deux fois de suite.
Evidemment, il y a obligatoirement une équipe qui devrait jouer 2 fois de suite par poule.
Pour moi, c'est faux, vérifiez dans le fichier.
4 premières équipes en poule 1
Pourquoi 4 ? Dans votre fichier il y a 4 poules mais de 6 équipes.

Ou alors je n'ai rien compris.😉
 
le fichier que j'ai mis est d'origine.
Notre tournoi comprend 4 poules de 4 équipes. (configurable au début).
Poule 1 :
1 contre 2
3 contre 4
1 contre 3
2 contre 4
1 contre 4
2 contre 3

Poule 2:
5 contre 6
7 contre 8
5 contre 7
6 contre 8
6 contre 7

etc etc pour les autres poules.

Je sais pas si je m'explique bien, désolé.
Merci Sylvanu
 
Essayez pour voir, mais le fichier est compliqué.
Les colonnes BA:BW sont masquées, il semble que la pondération se fait dans les colonnes BE et BF, j'ai remplacé 4 par 3 :
VB:
=SI(K4="";0;SI(K4>L4;3;SI(K4=L4;2;SI(K4<L4;1))))
et
=SI(L4="";0;SI(L4>K4;3;SI(L4=K4;2;SI(L4<K4;1))))
 

Pièces jointes

Bonsoir, je reviens vers vous ☹️
Je comprend pas, j'ai modifier le tableau (esthétiquement, couleur, masquer les colonnes non dispensables, largeur et hauteurs des lignes), j'ai enregistré et quand je l'ai ouvert de nouveaux, il ne fonctionnait plus... Quand on rentre les équipes dans la page "équipes" celle ci ne s'affiche plus automatiquement sur la page "poules" et "phase 2".
Ca donne l'impression que plus aucune formule ne fonctionne.
Merci beaucoup de votre aide.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
1
Affichages
926
Réponses
11
Affichages
544
Réponses
3
Affichages
862
Retour