Chiffres en lettres mais sans "zéro centime"

Bonjour à tous et toutes,

Là, je bosse pour mon épouse qui voudrait que les sommes inscrites en chiffres s'écrivent toutes seules en lettres.

Jusqu’à là ça va, il ne fallait pas le mot "euros", il ne fallait pas de majuscule, tout ça OK.

mais lorsque l'on écrit un chiffre sans rien après la virgule, c'est traduit par "zéro centime" est là ça coince!

Y a-t-il un moyen de contourner ce problème??

Merci à vous

EDIT: Je pense avoir solutionné le problème en supprimant les mots "zéro centime" dans la macro

If byDec = 0 Then
If Devise <> 0 Then ConvNumberLetter = ConvNumberLetter & " zéro centime " 

remplacé par 

If byDec = 0 Then
If Devise <> 0 Then ConvNumberLetter = ConvNumberLetter & " "

Ce n'est peut être pas très "excelien" mais ça à l'air de fonctionner!

Si il y a mieux, ce dont je ne doute pas, je suis preneur!

Merci

Bonjour bayard

J'ai validé votre solution qui est la seule à être possible

En revanche perso, je n'aurais pas mis d'espace à la fin

A+

Merci pour ta réponse, quant à l'espace, effectivement il n'a aucun intérêt donc je vais le retirer!

merci à toi

Rechercher des sujets similaires à "chiffres lettres zero centime"