[Déplacé ASP -> VB]Convertir une somme de chiffres en lettre [Résolu]

Signaler
Messages postés
4
Date d'inscription
mardi 28 avril 2009
Statut
Membre
Dernière intervention
2 septembre 2011
-
Messages postés
4
Date d'inscription
mardi 28 avril 2009
Statut
Membre
Dernière intervention
2 septembre 2011
-
Salut,
Dans une base access, je dois imprimer un état qui se présentera finalement de cette façon :
N° Nom et prénoms Montant
1 Léopold Prima 50 000
2 Peter Walker 60 000
Total 110 000

Arrêté le présent état à la somme de cent dix mille (110 000) francs.

Pouvez-vous m’aider pour que le total qui apparaît en mode création de l’état de la manière suivante : =somme([montant]) s’affiche en lettres dans l'état comme indiqué ci-dessus ?

Merci.

4 réponses

Messages postés
3983
Date d'inscription
jeudi 14 juillet 2005
Statut
Membre
Dernière intervention
30 juin 2013
13
Cecidevrait t'intéresser. Prends les fonctions, colle-les dans un module (crées-en un nouveau si tu n'en as pas encore) et appelle la fonction principale (source de données =ConvNumberLetter(somme([montant]), 1, 0) ). Tu devras seulement remplacer Euro par francs

VB.NET is good ... VB6 is better
Utilise Réponse acceptée quand un post répond à ta question
Messages postés
4
Date d'inscription
mardi 28 avril 2009
Statut
Membre
Dernière intervention
2 septembre 2011

Merci de la réponse mais je n’arrive toujours pas à solutionner mon état en tant que débutant ; peut-être me suis-je mal expliqué. Voila :

Dans le pied de l’état, en mode création, j’ai inséré au niveau du total la formule suivante : =somme([Montant]) . En mode aperçu, c’est 110 000 qui apparaît. Je voudrai voir en toute lettre Cent dix mille s’afficher.
Messages postés
3983
Date d'inscription
jeudi 14 juillet 2005
Statut
Membre
Dernière intervention
30 juin 2013
13
Remplace ta formule par =ConvNumberLetter(somme([montant]), 1, 0) et copie les fonctions dans un module (à créer).

VB.NET is good ... VB6 is better
Utilise Réponse acceptée quand un post répond à ta question
Messages postés
4
Date d'inscription
mardi 28 avril 2009
Statut
Membre
Dernière intervention
2 septembre 2011

Merci à ghuysmans99 pour la patience dont il a fait oeuvre en ce qui me concerne dans la résolution de mon état access. Tout est ok.