Fichier Excel

Re

Je ne comprends pas mon post 111 dans lequel je t'envoyais le dernier fichier rectifié après ton observation sur l'inversion dans l'onglet P14 a disparu !
Je te renvoie donc le fichier :
https://www.cjoint.com/c/KLuwWGcydQg

L'erreur provenait du fait que tu avais dupliqué les feuilles et donc la plage nommée de la colonne L, plage à laquelle je faisais appel dans les macros. Du coup les macros ne se référaient plus forcément à la plage de la bonne feuille. J'ai donc supprimé les plages nommées et mis les références en dur dans les macros.

C'est donc ce dernier fichier et celui-là seulement qui est opérationnel

Merci, passe de bonne fêtes également ☺

Cdlmnt
Via

Re,

Après pas mal de tests, tout fonctionne parfaitement. Je continue à finaliser le fichier, maintenant que tu as tout construit.
C'est une vraie fusée à réaction! Encore une fois, je suis très impressionné par ton rendu.......
Si toutefois, je ne fais pas de nouveau appel à toi cette semaine, je te souhaite de passer de joyeuses fêtes de fin d'année, et j'espère que le Père Noël te gâtera pour tous les services que tu rends avec réactivité , patience, etc........!!!!
A bientôt pour un autre défi.
Un grand merci et tout mon respect.
Cdlmnt
Dodo

Re

En fait j'avais nommé "rencontres" dans P1 la plage de recherche des concaténations en colonne L et inscrit cette plage nommée dans les macros
Quant tu as dupliqué les feuilles cela a dupliqué la plage nommée et les macros s'y perdent !
Donc j'ai supprimé ces plages nommées et remis les références de plage dans les macros, et donc nouveau dernier bon et seul bon fichier (pour l'instant)
https://www.cjoint.com/c/KLuqNwBUUsg

Re,

A priori, pas de "beug" avec les macros! Par contre dans le test de l'onglet P14, AD est avant AF alors que W est < et ont match nul?
J'ai regardé les formules dans X et W notamment, je n'ai rien trouvé d'anormal?

https://www.cjoint.com/c/KLupZ7ZLazK

Cdlmnt
Dodo

Bonjour Dodo

Il s'agissait d'un $ qui manquait dans les formules de la colonne X dans toutes les feuilles
Fichier rectifié, en espérant que tout sera bon cette fois et que je n'ai pas fait d'autre oubli !
https://www.cjoint.com/c/KLupei7kSqg

Cdlmnt
Via

Bonjour Via,

Après pas mal de tests, je n'ai rien trouvé d'anormal, par contre dans le P12, la macro beugue de temps en temps surtout lorsque je modifie les valeurs de AB avec AD?
C'est très aléatoires et très bizarre.

https://www.cjoint.com/c/KLuk1WAYWWK

Cdlmnt
Dodo

Re,

A 6 la macro devient plus complexe, il manquait une condition dans les 2 cas de 2exaequos seuls ou avec triplons ou quadruplons, donc ils s'appliquaient systématiquement d'où l'erreur
Fichier rectifié :
https://www.cjoint.com/c/KLtwMFlXWYg

Cdlmnt
Via

Re,

Dans l'onglet P1, AB est 3 ème et AF 4 ème, pourtant W de AF>AB et en X le rang de AB est 4 et celui de AF 3?
Je ne vois pas d'explication.
Cdlmnt
Dodo

https://www.cjoint.com/c/KLtwl7DgGqK

Re,

J'en finis pas de te donner du tracas! Il est vrai que les tests sont meilleurs comme ceci, je continue et tiens au courant.

Merci et bonne nuit.

Cdlmnt
Dodo

Re

Ah la grosse boulette de ma part ! j'ai mis du temps à trouver le bug
C'est à la fin de la macro Sub exaequos :
'si sextuplons
If Range("i" & ligne) = 5 Then
ce doit être :
'si sextuplons
If Range("i" & ligne) = 6 Then

Donc en cas de quintuplons Excel faisait 2 fois les calculs (en appliquant une fois la macro cinq et une fois la macro six) ce qui faussait le résultat bien sûr !

Cdlmnt
Via

Re,

En faisant quelques tests sur le fichier ci-dessous, j'ai un pb avec les onglets 4 et 13 qui ne respectent pas la même logique.
Dans un cas c'est la rencontre entre les 2ers qui est pris en compte, dans l'autre c'est le nbre en W.
C'est le seul "bug" pour l'instant.

https://www.cjoint.com/c/KLttTmMYgoK

Cdlmnt
Dodo

Re,
Ne tiens pas compte de mon post précédent, j'ai du l'envoyer en même temps que le tien!
Je découvre ton dernier à l'instant.
J'ai du encore en faire une!

Cdlmnt
Dodo

Re,

En fait je viens de m'apercevoir que dans l'onglet P2, AD avec 11 points s'est glissée au milieu des éq à 15 points, j'ai donc du mal faire la manœuvre?
Après plusieurs tentatives, idem

https://www.cjoint.com/c/KLtryWV1lyK

Cdlmnt
Dodo

Bonjour Dodo

Dans le fichier que tu m'as envoyé, il n'y aucune modif de faite dans la macro, les tris se font toujours sur la feuille P1 uniquement (d'où le grisé) !!
Voilà la fichier avec la macro rectifiée
https://www.cjoint.com/c/KLtrA68ippg
Cdlmnt
Via

Bonjour Via,

J'ai beau retourner ton tableau dans tous les sens, je pense qu'il est complet pour les doublons.
Pour la macro, j'ai fait ce que tu m'as décrit, c'est bon, si ce n'est que sur la feuille P1, la zone triée est grisée lorsque je lance la macro sur P2 mais je ne crois pas que ça gêne le calcul?
Voir ci-dessous
https://www.cjoint.com/c/KLtjodPrENK
Cdlmnt
Dodo

Re,

C'est normal, dans la macro Sub classement dans les tris il est fait référence à la feuille P1

Selectionne toutes les lignes de cette Sub classement
puis va dans Edition - Remplacer
Dans Rechercher tu tapes Worksheets("P1")
Dans Remplacer tu tapes Activesheet
Avec Texte sélectionné coché tu cliques sur Remplacer tout et cela doit te faire les 10 modifs nécessaires

Activesheet désignant la feuille courante sur laquelle on est positionné, la macro marchera sur toutes les feuilles dupliquées à partir de P1 ou de P2

Pour le traitement de 6 égalités je pense que j'ai bien couvert tous les cas de doublons possibles, voir mon tableau ci-dessous, les autres cas étant traités par le classement d'après la colonne W



Cdlmnt
Via

Re,

OK, Je crois avoir enfin compris ( je n'avais pas pensé aux Diff négatives).
Les quelques tests réalisés sont bons mais ce n'est pas suffisant.
Avec 6 égalités, nous couvrons , à mon sens, tous les cas.
Comme le fichier doit comprendre au moins 8 poules, j'ai mis sur une copie du tien un second onglet , mais je ne suis pas arrivé à modifier la macro pour le faire fonctionner, ci dessous.
Plus pénible que moi, difficile à trouver!

https://www.cjoint.com/c/KLswzMDBq4K

Cdlmnt
Dodo

Re,

Oui tu as fait une bêtise !

Déjà tu n'a pas l'air d'avoir modifié le bon fichier
Le seul valable désormais et dans lequel j'ai justement corrigé la formule en W pour tenir compte d'éviter une égalité est le dernier envoyé dans mon post 92

Ensuite il ne faut pas rajouter la diff à la fin en l'additionnant aux Pour, cela donne n’importe quoi, en plus comme il y a des diff négatives ! (c'est pour cela que j'ai pondéré les diff en ajoutant la valeur absolue de la diff minimum dans la formule en W pour les non ex aequos ou dans la plage U96:U103 pour les exaequos, ce qui fait que l'équipe qui à la plus petite diff négative se trouve avec une diff = 0 et les autres avec des diff positives)

Attends avant d'aller plus loin je viens de finaliser un nouveau fichier pour analyser jusqu'à 6 exaequos (soyons fous, mais je n'irai pas plus loin !), le voici, (avec bonne formule en W) :
https://www.cjoint.com/c/KLssISct3Dg

A tester (en gardant pour l'instant par sécurité aussi celui pour 5 rappelé au premier paragraphe)

Cdlmnt
Via

Re,

Il est magique, pour le moment je n'ai trouvé aucun "bug", par contre je me suis permis d'ajouter en W "F72" afin d'éviter l'égalité en 7 ème place entre AH et AD pour les différencier, car il se peut que seul le dernier descend de catégorie..
Voir exemple ci-dessous
Ai je fait une bêtise?
Cdlmnt
Dodo

https://www.cjoint.com/c/KLsrFDnKQXK