Hello tous,
J'ai trouvé ce bout de code qui permet de chercher la position du 2eme, 4eme, 7eme.... espace dans une cellule.
Function posesp(ici As Range, ParamArray ch() As Variant)
Dim p()
texte = ici.Value
L = Len(texte)
ReDim p(1 To L)
For i = 1 To L
If Asc(Mid(texte, i, 1)) = 32...