XL 2016 Formule pour convertir des chiffres en lettres

AMIGO2

XLDnaute Nouveau
Bonjour les ami(e)s,

Est ce qu'il y a quelqu'un qui connaît la formule pour convertir les chiffres en lettres sans passer par des macros.

Merci de votre aimable réponse.
 

AMIGO2

XLDnaute Nouveau
Non, il y a plus simple et dans une seule cellule pas besoin de VBA, macros... mais le problème parfois excel affiche un message d'erreur "formule trop longue..."

=SI(--STXT(TEXTE(C12;"000000");1;1)=0;;SI(ET(--STXT(TEXTE(C12;"000000");2;1)=0;--STXT(TEXTE(C12;"000000");3;1)=0);" Cent ";"Cent "))
&CHOISIR(STXT(TEXTE(C12;"000000");2;1)+1;;;"Vingt ";"Trente ";"Quarante ";"Cinquante ";"Soixante ";"Soixante-dix ";"Quatre-vingt ";"Quatre-vingt-dix ")
&SI(--STXT(TEXTE(C12;"000000");2;1)<>1;CHOISIR(STXT(TEXTE(C12;"000000");3;1)+1;;"un";"deux";"trois";"quatre";"cinq";"six";"sept";"huit";"neuf");CHOISIR(STXT(TEXTE(C12;"000000");3;1)+1;"dix";"onze";"douze";"treize";"quatorze";"quinze";"seize";"dix-sept";"dix-huit";"dix-neuf"))
&SI((--STXT(TEXTE(C12;"000000");1;1)+STXT(TEXTE(C12;"000000");2;1)+STXT(TEXTE(C12;"000000");3;1))=0;;SI(OU((--STXT(TEXTE(C12;"000000");4;1)+STXT(TEXTE(C12;"000000");5;1)+DROITE(TEXTE(C12;"000000")))=0;--STXT(TEXTE(C12;"000000");4;1)<>0);" mille ";" mille "))
&CHOISIR(STXT(TEXTE(C12;"000000");4;1)+1;;"un";"deux";"trois";"quatre";"cinq";"six";"sept";"huit";"neuf")
&SI(--STXT(TEXTE(C12;"000000");4;1)=0;;SI(ET(--STXT(TEXTE(C12;"000000");5;1)=0;--DROITE(TEXTE(C12;"000000"))=0);" cent ";" cent "))&
CHOISIR(STXT(TEXTE(C12;"000000");5;1)+1;;;"vingt ";"trente ";"quarante ";"cinquante ";"soixante ";"soixante-dix ";"quatre-vingt ";"quatre-vingt-dix ")
&SI(--STXT(TEXTE(C12;"000000");5;1)<>1;CHOISIR(DROITE(TEXTE(C12;"000000"))+1;;"un";"deux";"trois";"quatre";"cinq";"six";"sept";"huit";"neuf");CHOISIR(DROITE(TEXTE(C12;"000000"))+1;"dix";"onze";"douze";"treize";"quatorze";"quinze";"seize";"dix-sept";"dix-huit";"dix-neuf"))&" Euros TTC"
 

Modeste geedee

XLDnaute Barbatruc
Bonsour®
Non, il y a plus simple et dans une seule cellule pas besoin de VBA, macros... mais le problème parfois excel affiche un message d'erreur "formule trop longue..."
o_O Pas que ...???:rolleyes:
consulter les archives et posts antérieurs !!!
1575909523800.png
:rolleyes:
 

Discussions similaires

Réponses
116
Affichages
3 K
Réponses
3
Affichages
495