XL 2019 Convertir nombre en lettre sans la monnaie

NatachaM

XLDnaute Nouveau
Bonsoir, bonjour

Je souhaite créer un fichier pour générer des fiches d'exercices. Pour cela j'ai fait le fichier ci-joint avec une ''VBA?'' trouvée sur internet ; mais j'ai deux soucis.
Le premier est que les nombres sont considérés comme des sommes d'argent et le terme ''euros'' apparaît, je voudrais le supprimer.
Le deuxième est qu'il n'y pas de trait d'union entre tous les mots (ce qui est demandé par l'éducation nationale) et même si je ne compte pas de faute si les élèves ne les mettent pas je ne peux pas leur présenter une feuille ou il en manque.

Si vous avez une solution, merci d'avance.
Natacha
 

Pièces jointes

  • Nombre en lettre.xlsm
    21.5 KB · Affichages: 33
Solution
Bonsoir,
juste remplacer cela : dans la procéduve vba au choix
si sans traits d'union
t = Replace(Left(Trim(t), Len(Trim(t)) - Len(Split(Trim(t), " ")(UBound(Split(Trim(t), " ")))) - 1), "-", " ")
si avec traits d'union
t = Replace(Left(Trim(t), Len(Trim(t)) - Len(Split(Trim(t), " ")(UBound(Split(Trim(t), " ")))) - 1), " ", "-")
cdt
Laurent

patricktoulon

XLDnaute Barbatruc
re
bonjour a tous
oui Modeste geedee tu a raison dans la version 2019 j'ai effectivement raté le positionnement en terme de nombre de caractères pour les décimales , pour la monnaie dans la oldversion c’était bon par contre

je me suis plus préoccupé de 0.5= 0.50
 

Discussions similaires

Statistiques des forums

Discussions
312 428
Messages
2 088 336
Membres
103 814
dernier inscrit
Lolo280277