Autres Créer des conditions concernant des chevaux au départ d'une course (RESOLU)

JBARBE

XLDnaute Barbatruc
Bonjour à tous,
Serait-il possible en prenant comme référence les performances des chevaux, de leurs attribués les valeurs de ces performances de l'arrivée du 1er au 5éme et de compter dans TOTAUX le Total des courses faites !
Un exemple est fait pour le cheval " Monsieur XOO " !
Merci à l'avance est bonne journée !
 

Pièces jointes

  • Classeur1.xls
    81.5 KB · Affichages: 20

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonsoir Jbarbe,
Sans VBA difficile, avec ... guère plus simple.
Je me suis inspiré pour les codes de :
https://www.guide-hippique.com/comprendre-performances-cheval.html
Je prends en compte toutes les années. Avec cette fonction perso :
VB:
Function Perf(Chaine$, N%)
' Voir Codes : https://www.guide-hippique.com/comprendre-performances-cheval.html
R = Array("A", "D", "T", "R", "a", "m", "o", "s", "c", "h", "p")
' Remplace type course par x
For i = 0 To UBound(R)
    Chaine = Replace(Chaine, R(i), "x")
Next i
' Supprime années
For i = 10 To 30
    Chaine = Replace(Chaine, "(" & i & ")", "")
Next i
' Tableau perf
T = Split(Chaine, "x")
' Compte les perfs
For i = 0 To UBound(T)
    If T(i) = N Then Perf = Perf + 1
Next i
' Si le param N vaut 0 alors on remonte le nombre de courses
If N = 0 Then Perf = UBound(T)
End Function
La formule est =Perf(Chaine,N) Chaine étant la colonne G, N étant la place. A noter que si N=0 alors on remonte le nombre de courses, colonne Q.
A vérifier car le système de codage des courses n'est pas très évident.
NB : Je ne tiens pas compte des "accidents" comme Th car je n'ai pas trouvé la liste. Si vous l'avez je compléterais.
 

Pièces jointes

  • Classeur1 (1).xlsm
    22.8 KB · Affichages: 50

JBARBE

XLDnaute Barbatruc
Bonjour sylvanu ,
C'est parfait !
Tu m'avais déjà aidé pour les courses mais avec les années et les 3 premiers !
J'ai voulu modifier une fonction sans succès !
Bravo et Merci !
Bonne soirée !
 

Membres actuellement en ligne

Statistiques des forums

Discussions
312 321
Messages
2 087 265
Membres
103 501
dernier inscrit
talebafia