=STXT(A1;EQUIV(VRAI;ESTNUM(CNUM(STXT(A1;LIGNE($1:$255);1)));0);NB(--(STXT(SUBSTITUE(A1;",";"0");LIGNE($1:$255);1))))
=SUBSTITUE(A1;B1;"")
Bonjour,Bonjour à tous,
A essayer en "B1"
validation matricielleVB:=STXT(A1;EQUIV(VRAI;ESTNUM(CNUM(STXT(A1;LIGNE($1:$255);1)));0);NB(--(STXT(SUBSTITUE(A1;",";"0");LIGNE($1:$255);1))))
En "C1"
Code:=SUBSTITUE(A1;B1;"")
JHA
En C 1=SIERREUR(GAUCHE(A2;EQUIV(FAUX;ESTNUM(-GAUCHE(A2;LIGNE(INDIRECT("1:"&(1+NBCAR(A2))))));0)-1);A2)
=SUBSTITUE(A1;B1;"";1)
Bonjour
formules glanées dans mes archives
Pour extraire les chiffres (formule en colonne B)
=1*GAUCHE(A1;SOMME(NBCAR(A1)-NBCAR(SUBSTITUE(A1;{"0";"1";"2";"3";"4";"5";"6";"7";"8";"9"};""))))
Pour extraitre le texte (formule en colonne C)
=SUPPRESPACE(STXT(A1;NBCAR(B1)+1;999))
Testée avec tes exemples
Bonjour,Bonjour à tous ,
Une autre formule.
En B1
En C 1
Bonjour,Bonjour à tous
Avec la poussière de 2019
Bonjour,Bonjour @ tous,
Tu parles de LAMBDA(), mais elle n'est pas encore disponible officiellement sous Microsoft 365. Seuls les Miscrosoft Insiders peuvent en profiter sous la version Bêta de Microsoft 365.