Re,
Dans ton premier exemple les adresses e-mail étaient entourés d'espaces (devant et derrière), dans le second de <>.
Pour le second (les <>) j'ai même pris une précaution me disant qu'il y auraient peut-être des e-mails avec du texte derrière le >.
La formule que je t'ai proposée fonctionne pour ce que tu as demandé.
Il me semble que si tu veux être aidée, tu te dois de fournir un exemple représentatif (tous les cas de figure) de tes données, faute de quoi on pourra encore tourner longtemps en rond !
J'attends tes données.
abcd
Re,
Je n'avais pas vu ton message avec la dernière pièce jointe.
S'il n'y a pas d'autres cas de figure, la formule en pièce jointe devrait fonctionner.
abcd
=MINUSCULE(SI(OU(ESTERR(TROUVE("<";A2));ESTERR(TROUVE(" ";A2)));
A2;STXT(A2;TROUVE("<";A2;1)+1;(TROUVE(">";A2;1)-TROUVE("<";A2;1)-1))))
=GAUCHE(B2;TROUVE("@";B2)+TROUVE(".";STXT(B2;TROUVE("@";B2);99)))&
SUBSTITUE(STXT(B2;TROUVE("@";B2)+TROUVE(".";STXT(B2;TROUVE("@";B2);
99))+1;99);".";"")
Bonjour à tous,
J'ai suivi ce fil avec attention et les réponses sont au top.
Serena, Pour ta question : "si tu veux copier-coller les adresses email dans un autre fichier"
Un simple Copier/Coller/Collage spécial et cocher Valeur doit suffire... si j'ai compris.
Bon WE.
Jean-Pierre
=STXT(A1;TROUVE("µ";SUBSTITUE(GAUCHE(A1;TROUVE(".";STXT(A1;TROUVE("@";A1);99))+
TROUVE("@";A1)+1);",";"µ";5))+2;TROUVE(".";STXT(A1;TROUVE("@";A1);99))+
TROUVE("@";A1)-TROUVE("µ";SUBSTITUE(GAUCHE(A1;TROUVE(".";STXT(A1;TROUVE("@";A1);
99))+TROUVE("@";A1)+1);",";"µ";5)))
=[COLOR=red]SUBSTITUE([/COLOR]STXT(A1;TROUVE("µ";SUBSTITUE(GAUCHE(A1;TROUVE(".";
STXT(A1;TROUVE("@";A1);99))+TROUVE("@";A1)+1);",";"µ";5))+[COLOR=red]3[/COLOR];TROUVE(".";
STXT(A1;TROUVE("@";A1);99))+TROUVE("@";A1)-TROUVE("µ";SUBSTITUE(GAUCHE(A1;
TROUVE(".";STXT(A1;TROUVE("@";A1);99))+TROUVE("@";A1)+1);",";"µ";5)))[COLOR=red];"""";"")[/COLOR]