Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Ecrire la somme en lettres un résultat 2664.31

Ecrire la somme en lettres un résultat 2664.31

3 réponses
Avatar
Philippe.LAPORTE
Bjr
Dans une cellule, j'ai la formule suivante qui ne fait pas apparaitre les
décimales comment puis je modifier cette formule ?
ci dessous la formule
Merci de votre aide philippe.laporte@tele2.fr

=SI(TRONQUE($F46/1000)>1;RECHERCHEV(TRONQUE($F46/1000);N2:O202;2)&" mille
";SI(TRONQUE($F46/1000)=1;"mille
";""))&SI(TRONQUE(MOD($F46;1000)/100)>1;RECHERCHEV(TRONQUE(MOD($F46;1000)/10
0);N2:O202;2)&"
cent";SI(TRONQUE(MOD($A51;1000)/100)=1;"cent";""))&SI(ET(ET(MOD(F46;1000)<>1
00;MOD($F46;100)=0);TRONQUE(F46/1000)<>F46/1000);"s";"
"&RECHERCHEV(MOD($F46;100);N2:O202;2))
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Patrick974
Salut,

Je te conseille d'aller visiter le site de Frederic
SIGONNEAU
http://perso.wanadoo.fr/frederic.sigonneau

Il y a un script VBA pour convertir un nombre en lettre

-----Message d'origine-----
Bjr
Dans une cellule, j'ai la formule suivante qui ne fait
pas apparaitre les

décimales comment puis je modifier cette formule ?
ci dessous la formule
Merci de votre aide

=SI(TRONQUE($F46/1000)>1;RECHERCHEV(TRONQUE
($F46/1000);N2:O202;2)&" mille

";SI(TRONQUE($F46/1000)=1;"mille
";""))&SI(TRONQUE(MOD($F46;1000)/100)>1;RECHERCHEV
(TRONQUE(MOD($F46;1000)/10

0);N2:O202;2)&"
cent";SI(TRONQUE(MOD($A51;1000)/100)=1;"cent";""))&SI(ET
(ET(MOD(F46;1000)<>1

00;MOD($F46;100)=0);TRONQUE(F46/1000)<>F46/1000);"s";"
"&RECHERCHEV(MOD($F46;100);N2:O202;2))


.



Avatar
Philippe.LAPORTE
Bjr et merci de ta réponse
ai bien trouvé son script mais ne suis pas familiarisé encore avec VB
comment l'intégrer dans ma facture sur excel qui comporte le montant ttc en
question dans une cellule

"Patrick974" a écrit dans le message
de news: 401b01c3e348$d9bd5400$
Salut,

Je te conseille d'aller visiter le site de Frederic
SIGONNEAU
http://perso.wanadoo.fr/frederic.sigonneau

Il y a un script VBA pour convertir un nombre en lettre

-----Message d'origine-----
Bjr
Dans une cellule, j'ai la formule suivante qui ne fait
pas apparaitre les

décimales comment puis je modifier cette formule ?
ci dessous la formule
Merci de votre aide

=SI(TRONQUE($F46/1000)>1;RECHERCHEV(TRONQUE
($F46/1000);N2:O202;2)&" mille

";SI(TRONQUE($F46/1000)=1;"mille
";""))&SI(TRONQUE(MOD($F46;1000)/100)>1;RECHERCHEV
(TRONQUE(MOD($F46;1000)/10

0);N2:O202;2)&"
cent";SI(TRONQUE(MOD($A51;1000)/100)=1;"cent";""))&SI(ET
(ET(MOD(F46;1000)<>1

00;MOD($F46;100)=0);TRONQUE(F46/1000)<>F46/1000);"s";"
"&RECHERCHEV(MOD($F46;100);N2:O202;2))


.



Avatar
Frédéric Sigonneau
Bonsoir,

Après avoir téléchargé les compléments (qui constituent une solution possible
parmi beaucop d'autres) contenus dans ce fichier :

http://perso.wanadoo.fr/frederic.sigonneau/office/Nb2Words.zip

installer la macro complémentaire pour Excel, au besoin en suivant les
indications du fichier d'aide incorporé. Ensuite, le menu contextuel des
cellules met à disposition une fonction de feuille de calcul, MONTANTENLETTRES,
qui permet d'afficher en toutes lettres le contenu d'une cellule, par exemple
celle qui contient le montant ttc, avec ce genre de syntaxe (les paramètres sont
expliqués dans l'aide) :

=MONTANTENLETTRES(A1;4;0;1)

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !


Bjr et merci de ta réponse
ai bien trouvé son script mais ne suis pas familiarisé encore avec VB
comment l'intégrer dans ma facture sur excel qui comporte le montant ttc en
question dans une cellule

"Patrick974" a écrit dans le message
de news: 401b01c3e348$d9bd5400$
Salut,

Je te conseille d'aller visiter le site de Frederic
SIGONNEAU
http://perso.wanadoo.fr/frederic.sigonneau

Il y a un script VBA pour convertir un nombre en lettre

-----Message d'origine-----
Bjr
Dans une cellule, j'ai la formule suivante qui ne fait
pas apparaitre les

décimales comment puis je modifier cette formule ?
ci dessous la formule
Merci de votre aide

=SI(TRONQUE($F46/1000)>1;RECHERCHEV(TRONQUE
($F46/1000);N2:O202;2)&" mille

";SI(TRONQUE($F46/1000)=1;"mille
";""))&SI(TRONQUE(MOD($F46;1000)/100)>1;RECHERCHEV
(TRONQUE(MOD($F46;1000)/10

0);N2:O202;2)&"
cent";SI(TRONQUE(MOD($A51;1000)/100)=1;"cent";""))&SI(ET
(ET(MOD(F46;1000)<>1

00;MOD($F46;100)=0);TRONQUE(F46/1000)<>F46/1000);"s";"
"&RECHERCHEV(MOD($F46;100);N2:O202;2))


.