Classement pour un concours de pêche

[danilo2722]

Bonjour,

J'ai établi un fichier excel 2010 pour le classement d'un concours de pêche.
Le poids total de la journée donne le rang et des points attribués au rang, no problemo, mais pour la première fois j'ai des exaequo et le suivant décale de 1 rang. Je m'explique, les deux exaequo ont le rang 5 et le suivant le rang 7, excel ne donne pas le rang 6!? Peut-on en modifiant la formule soit mettre les deux exaequo au rang 6 et non au rang 5 ou celui qui est 7 au rang 6, c'est égal. En rouge sur mon fichier les deux exaequo et en jaune le suivant.
Merci d'av
Danilo

 

[pascal82]

Re : Classement pour un concours de pêche

Bonjour danilo2722,

Une proposition avec colonnes supplémentaires. A Voir si cela correspond à la demande

Cordialement

Nota: Vous avez 2 N°2 et 2 N°10

 

[GerardCalc]

Re : Classement pour un concours de pêche

Bonjour,

Je m'explique, les deux exaequo ont le rang 5 et le suivant le rang 7, excel ne donne pas le rang 6!? Peut-on en modifiant la formule soit mettre les deux exaequo au rang 6 et non au rang 5 ou celui qui est 7 au rang 6, c'est égal

Premier cas (décaler les 2 au rang 6) :

=RANG(AC5;$AC$5:$AC$35)+NB.SI($AC$5:$AC$35;AC5)-1

Mais de cette façon tu auras toujours des "trous" (pas de 5 et deux 6).

Second cas (on bouche les trous...) :

=SOMME(SI(AC5<$AC$5:$AC$35;1/NB.SI($AC$5:$AC$35;$AC$5:$AC$35)))+1

Formule matricielle, à valider par Ctrl+Maj+Entrée.

A+

 

[Paf]

Re : Classement pour un concours de pêche

Bonjour danilo2722, pascal82, GerardCalc

un essai par fonction personnalisée à tester:

en G5 : =Ordre($F$5:$F$34;F5) à tirer vers le bas

dans un module standard:

Function Ordre(Plage As Range, Cel As Range)
 Dim PT As Object, Dico As Object
 Set PT = CreateObject("system.collections.arraylist")
 Set Dico = CreateObject("Scripting.Dictionary")
 For Each C In Plage
    If C.Value <> "" Then PT.Add C.Value
 Next
 PT.Sort
 PT.Reverse
 For Each elem In PT
    If Not Dico.Exists(elem) Then x = x + 1
    Dico(elem) = x
 Next
 Ordre = IIf(Dico.Exists(Cel.Value), Dico(Cel.Value), "")
End Function

A+

 

[danilo2722]

Re : Classement pour un concours de pêche

Alors:
pascal82, c'est pas ok, merci quand même
GérardCalc, la première solution sans boucher les trous c'est ok, la seconde où on bouche les trous, celle qui m'intéresse le plus, dans ma case AC5, ça me donne 1 partout!?
Paf, ça fonctionne pas, merci quand même

 

[Modeste geedee]

Re : Classement pour un concours de pêche

Bonsour®
probleme également dans l'attribution des points ...
au cas il n'y aurait pas d'exaequos
la liste des points à attribuer n'est pas suffisamment longue :

correctif :
=SI(E5=0;1;CHOISIR(RANG(E5;E$5:E$35);25;20;16;13;11;10;9;8;7;6;5;4;3;2;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1))
la liste doit contenir autant de valeurs que de rangs possibles (soit =nbr de participants)
ou bien :
=SI(E5=0;1;CHOISIR(MIN(15;RANG(E5;E$5:E$35));25;20;16;13;11;10;9;8;7;6;5;4;3;2;1))

pourquoi attribuer 1 point à un absent ???
=SI(E5="";0,5;CHOISIR(RANG(E5;E$5:E$35);25;20;16;13;11;10;9;8;7;6;5;4;3;2;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1;1))

 

[danilo2722]

Re : Classement pour un concours de pêche

Pour Modeste, désolé je n'ai pas précisé que dans ma liste certains pêcheurs n'étaient pas présent donc case vide, ceux qui sont présents mais qui n'ont pas fait de poissons reçoivent 1 points. Mais la remarque est juste car dans la solution de GérardCalc le classement décale juste au niveau du rang mais n'attribue pas les points correctement aux deux exaequo en 6 ème position qui devraient recevoir 10 points et non 11...

 

[Paf]

Re : Classement pour un concours de pêche

Re, et bonjour Modeste geedee

Paf, ça fonctionne pas, merci quand même

Sans préciser ce qui ne fonctionne pas .....

sur ce classeur joint ça fonctionne .

A+

 

[danilo2722]

Re : Classement pour un concours de pêche

Désolé Paf, j'ai oublié de précisé, chez moi ça donne #NOM? j'ai contrôlé le format de la case et elle est aussi standard comme la tienne.

 

[Paf]

Re : Classement pour un concours de pêche

Re,

chez moi ça donne #NOM?

a priori la fonction n'est pas trouvée, parce qu'elle ne figure pas dans un module standard.

A+