Bonjour à tous,

J'ai une feuille de résultat qui me donne le classement intermédiaire du tournoi.
Je cherche une solution pour vérifier le tour de jeu des finalistes.
Le classement intermédiaire s'établit au maximum sur 6 joueurs.
Le premier joueur à son classement intermédiaire sur la case X9
Les joueurs suivant il suffit d'incrémenter de 5 pour chaques joueurs.
Ce qui donne pour le dernier joueurs, son classement intermédiaire sur la case X34.

Pour le dernier tour (finale), le premier joue contre le second et le troisième contre le quatrième (classement établit sur le classement intermédiaire).

Un exemple de solution possible
Joueur1: X9 = 1
Joueur2: X14 = 3
Joueur3: X19 = 2
Joueur4: X24 = 4
Joueur5: X29 = 6
Joueur6: X34 = 5

Ce qui nous donne pour le dernier tour
Joueur1 contre Joueur3
et
Joueur2 contre Joueur4
Ce qui m'interresse est de connaitre la case du nom du joueur concerné.
Je reprend l'exemple:
Joueur1 contre Joueur3 me donne case A9 contre case A19
Joueur2 contre Joueur4 me donne case A14 contre case A24.
Si j'ai ces 2 cases je peut vérifier si les tours ne mettent pas d'erreur.

Le problème est que je ne veut pas mettre toutes les possibilité, car il faudrait que j'écrive plus de 300 conditions.

Je pensais à un script de ce type :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
For Each cel In Sheets("Joueurs").Range("X9 :X34")
      If cel = 1 Then
          joueurclasse1 = cel.Offset(0, -23)
      End If
      If cel = 2 Then
          joueurclasse2 = cel.Offset(0, -23)
      End If
Next cel
Le problème de ce code est que j'ai le nom du joueur et non la case

Si vous avez des idées ou d'autres méthodes de procédés pour obtenir le résultat plus simplement
Merci à tous