XL 2010 formule de remplacement

[kadelmalin]

Bonjour,
Je sollice votre aide pour la bonne formule de remplacement. J'ai une série de valeurs séparées par des virgules, je voudrais que la dernière virgule soit remplacée par "et"; par exemple : 12,16,22,28 et 30
Merci.

 

[sylvanu]

Bonjour Kadelmalin,
Si A1 contient 12,16,22,28,30 essayez :

=SUBSTITUE(A1;",";" et ";NBCAR(A1)-NBCAR(SUBSTITUE(A1;",";"")))

qui donne 12,16,22,28 et 30

 

[kadelmalin]

Merci sylvanu, c'est parfait.

 

[JHA]

Bonjour à tous,

Une autre pour le fun

=SUBSTITUE(A1;",";" et ";SOMMEPROD(--(STXT(A1;LIGNE(INDIRECT("1:"&NBCAR(A1)));1)=",")))

JHA

 

[Staple1600]

Bonsoir le fil

Une autre aussi pour le fun
(Heureusement le CTRL+C/CTRL/V existe

=JOINDRE.TEXTE(",";1;FILTRE.XML("<t><s>"&SUBSTITUE(A1;",";"</s><s>")&"</s></t>";"//s[last()]/preceding::*"))&" et "&FILTRE.XML("<t><s>"&SUBSTITUE(A1;",";"</s><s>")&"</s></t>";"//s[last()]")