=GAUCHE(A1;CHERCHE("µ";SUBSTITUE(A1;" ";"µ";3))-1)
=GAUCHE(SUBSTITUE(SUPPRESPACE(A1) & " ";" ";"^";3);TROUVE("^";SUBSTITUE(SUPPRESPACE(A1) & " ";" ";"^";3))-1)
Function Fperso(cel As Range)
Dim a, x, z
Application.Volatile
a = Split(cel, " ")
x = Mid(a(2), 1, 99)
z = Left(cel, InStr(1, cel, x, 1) + (Len(x) - 1))
Fperso = z
End Function