Bonjour à tous ,
J'ai ce fichier qui permet de convertir les chiffres en lettres , je veux ajouter la langue anglaise avec les mêmes paramètres
je parle de la première fonction =ConvNumberLetter
cette fonction converti n'importe quel nombres en toutes lettres avec la monnaie "Euro" en francais voir la discussion et surtout les mises a jour ICI Function NblettreFR(chain As String) As String Dim t, dixx&, dix&, cxx&, u&, Part, ms, m...
bonjour bruno
perso je préfère 2 fonctions plus petites et plus légères
les petites dernières de 2021 nbdecFR32 et nbdecUS32
qui gèrent 1 , 2 ou 3 décimales
avec
arrondi auto
arrondi superieur
arrondi inférieur
pas d'arrondi
tu constatera qu'au départ c'est le même moteur de conversion que tout mes fonctions du genre
il sera facile de modifier la virgule en "dollars" et ajouter "cents" a la fin
J'ai Trouvé ce code sur internet , ca fonctionne bien , sauf que le chiffre afficher en lettre contient seulement deux chiffres alors que j'en ai besoin de trois chiffres . Voici le code : Option Explicit '*********** ' Devise=0 aucune ' =1 Dinar Tunisien ' =2 Dollar $ '...