Conversion d'une somme en lettres

Soyez le premier à donner votre avis sur cette source.

Vue 31 814 fois - Téléchargée 3 499 fois

Description

Dans ce programme , j'ai développé une routine FUNCTION très simple qui permet de convertir une somme en lettres. j'ai développé cette routine pour une application d'édition de lettres chèques.

Je sais que sur le site il existe déjà quelques routines de ce genre, mais je les trouvais beaucoup trop compliquée. Je pense que celle-ci est accessible à tout le monde

Faites en bon usage, et merci de vos commentaires qui me seront toujours très constructifs
AVI17

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
2
Date d'inscription
vendredi 26 avril 2013
Statut
Membre
Dernière intervention
26 avril 2013

bonjours

comment doisje faire pour utiliser cette fonction?

merci
Messages postés
1
Date d'inscription
mercredi 22 février 2006
Statut
Membre
Dernière intervention
22 mai 2006

bonjour avi17 , pour la correction de 'le cas de mille (1xxx)
If NbGrp 2 And I 2 And Right(Groupe, 1) = "1" Then ChiffresLettres_F = "mille" , il manque aussi le 'et' exemple = vingt et un mille ....' , merci
Messages postés
17288
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
70
pardon ?
Messages postés
1
Date d'inscription
lundi 6 mars 2006
Statut
Membre
Dernière intervention
6 mars 2006

Que du bidon ..... le porte monaie sinon rien......grosse bande de rigilolo !!!!
Messages postés
17288
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
70
Gosub / Return ?
je m'en sers régulièrement....
ca a l'avantage de ne pas trop surcharger la pile..
Afficher les 8 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.