Extraire Plusieurs données d'une cellule

Bonjour le forum

J’ai besoin de votre aide pour extraire (Fractionner) des données d’une cellule dans plusieurs cellules.

Les valeurs extraites doivent pas contenir de signes monétaires, de mesures et d’espaces

Ci-joint un fichier pour exemple de ma demande.

En vous remerciant par avance bonne journée

Bonjour,

Si VBA est possible, passez votre fichier en .xlsm, et placez cette fonction dans un module standard :

Function Course(ByVal ChaineATraiter As String, ByVal Position As Integer) As Variant

Dim TabChaine As Variant

    Course = ""
    TabChaine = Split(ChaineATraiter, " - ")

    Select Case Position
           Case 1
                Course = Trim(TabChaine(0))
           Case 2
                Course = Trim(Split(TabChaine(1), "m")(0))
           Case 3
                Course = Trim(Split(TabChaine(2), " €")(0))
           Case 4
                Course = Trim(Split(TabChaine(3), " Partants")(0))
    End Select

End Function

Et vous dupliquez vers le bas.

Bonjour à tous

Une solution par formule

bonjour

une contribution

cordialement

Bonjour à tous,

Pour compléter l'offre, déjà bien riche..., une proposition via Power Query :

Bonjour à tous

Aabondance de biens ne nuit pas.

Une formule purement 365 valable pour les 4 colonnes

=LET(Ch;"|"&REDUCE($A2;{"m - ";" € - ";" - ";" Partants"};LAMBDA(a;b;SUBSTITUE(a;b;"|")));Deb;CHERCHE("@";SUBSTITUE(Ch;"|";"@";COLONNE()-1))+1;Fin;CHERCHE("@";SUBSTITUE(Ch;"|";"@";COLONNE()-0));STXT(Ch;Deb;Fin-Deb))

Un grand merci a toute et a tous pour vos réponses

Bonne soirée