XL 2010 Extraire les Données de la musique d'un cheval

mamarus1

XLDnaute Nouveau
Bonjour le Forum,
Je dois extraire les données de la musique d'un cheval collé sur une même cellule en épurant pour chaque colonne son N° ( il y aura 6 N° ).
j'ai essayé avec la fonction STX, puis Substitue pour extraire les N°, de la cellule de base , mais rien n' y fait.
j'ai tenté de trouver cela sur le web, mais pas trouvé mon bonheur.
je joins le fichier en exemple sur le résultat souhaité.

Si quelqu'un peut m'aider sur la formule, je l'en remercie.

Cordialement,

Mamarus1
 

Pièces jointes

  • Classeur222.xlsx
    12.5 KB · Affichages: 27

patricktoulon

XLDnaute Barbatruc
re
pour être plus precis

LE PRINCIPE DE LA MUSIQUE​

La musique représente les performances passées d’un cheval. En général, cela concerne les 10 dernières courses du cheval. La musique se lit de gauche à droite (de la performance la plus récente à la plus ancienne) et chaque chiffre ou lettre indique son classement et la discipline.

LES CHIFFRES​

Tous les chiffres présents dans une musique indique le classement du cheval. (0=non-placé, 1=1er, 2=2e, 3=3e…). Au -delà de la 9e place, on considère que le cheval est non-placé.
Deux chiffres, entre parenthèses, qui se succèdent dans une musique indiquent un changement d’année.
Dans la musique suivante, 6h9h4h(15)4s1hAs2s1h, le cheval a couru 3 fois en 2016 (année en cours non mentionnée) et ses autres performances remontent à 2015.

LES LETTRES​

Lorsque qu’une lettre remplace un chiffre, cela indique qu’un autre événement de course est intervenu :
D : disqualifié (pour allures irrégulières au trot)
T : tombé (le plus souvent durant un parcours d’obstacle mais parfois en plat ou au trot)
A : arrêté pendant le parcours ((le plus souvent durant un parcours d’obstacle mais parfois en plat ou au trot)
Ret : rétrogradé (généralement après enquête)
• Les autres lettres indiquent tout simplement la discipline dans laquelle le cheval a évolué :
S : steeple-chase
C : cross-country
H : haies
A : attelé
M : monté
 

fanch55

XLDnaute Barbatruc
Bonsoir,
Mince je suis comme le lièvre de mars, à la bourre ...
Perso, j'avais fait une fonction à mettre dans un Module :
VB:
Function Horse_Musik(ByVal Texte As String, ByVal NoCol As Integer)
Dim Deb As Integer, Lon As Integer
    Deb = InStr(1, Texte, "("): Lon = InStr(Deb, Texte, ")") - Deb + 1
    Texte = Replace(Texte, Mid(Texte, Deb, Lon), "")
    If NoCol > 1 Then NoCol = (NoCol - 1) + NoCol
    Horse_Musik = Mid(Texte, NoCol, 1)
    If Not IsNumeric(Horse_Musik) Then Horse_Musik = 0
End Function
Formule non matricielle à mettre dans C4 et à tirer jusqu'en H19 :
Code:
=Horse_Musik($B4;C$3)

Ce code respecte ce qu'a précisé @patricktoulon au Post#6 ( il n'y a pas que D, A ou M )
 

Pièces jointes

  • Classeur222_F55.xlsm
    21.1 KB · Affichages: 31

Discussions similaires

Statistiques des forums

Discussions
314 422
Messages
2 109 447
Membres
110 482
dernier inscrit
ilyxxxh