IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

Passer un chiffre en toutes lettres


Sujet :

VBA Access

  1. #1
    Candidat au Club
    Inscrit en
    Février 2009
    Messages
    2
    Détails du profil
    Informations forums :
    Inscription : Février 2009
    Messages : 2
    Points : 2
    Points
    2
    Par défaut Passer un chiffre en toutes lettres
    Bonjour ,

    Apres quelques recherches sur ce forum je n'ai pas trouvé ce dont j'avais besoin alors voila je fait appel a vous .

    Mon problemes est que je voudrais faire une fonction etant capable de convertir un chiffre (1 ; 15 ; 52 ou 1000) en toutes lettres (un ;15 ;cinquante deux ; mille) .
    La facon dont j'ai essayé de proceder etait de decomposer ce chiffre en le rangean caractère par caractère dans un tableau (array) ce qui me permettrai de modifier les données a ma guise .

    mes questions sont :
    -Comment ranger un nombre caractère par caractère dans un tableau ?
    -Existe-t-il dans Access une procedure permettant d'effectuer l'action en question ?

    ps : Je m'excuse d'avance si ce probleme a deja été resolu dans un autre topic

  2. #2
    Inactif  

    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    4 555
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 4 555
    Points : 5 537
    Points
    5 537
    Par défaut
    Bonjour,

    les méthodes d'éclatement d'une chaine dans un tableau sont nombreuses...
    En voici une (entre autres) :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     monnombre = 123456
     montableau = Split(StrConv(monnombre, vbUnicode), Chr(0))
     For i = 0 To UBound(montableau)
       MsgBox montableau(i)
     Next

  3. #3
    Rédacteur/Modérateur

    Avatar de Heureux-oli
    Homme Profil pro
    Contrôleur d'industrie
    Inscrit en
    Février 2006
    Messages
    21 087
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 59
    Localisation : Belgique

    Informations professionnelles :
    Activité : Contrôleur d'industrie
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Février 2006
    Messages : 21 087
    Points : 42 926
    Points
    42 926
    Par défaut
    Salut,

    Pourquoi ne pas utiliser ce qui existe déjà ?

    http://access.developpez.com/sources...ffresEnLettres

  4. #4
    Candidat au Club
    Inscrit en
    Février 2009
    Messages
    2
    Détails du profil
    Informations forums :
    Inscription : Février 2009
    Messages : 2
    Points : 2
    Points
    2
    Par défaut
    Merci de m'avoir trouvé ces fonctions

    et excusez moi encore une fois d'avoir mal cherché

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Afficher un chiffre en toute lettre
    Par kayuyu dans le forum VB 6 et antérieur
    Réponses: 3
    Dernier message: 26/06/2008, 12h05
  2. Afficher un chiffre en toute lettre
    Par kayuyu dans le forum Langage
    Réponses: 4
    Dernier message: 24/06/2008, 13h54
  3. Ecrire des chiffres en toutes lettres
    Par ali_Imouzzer dans le forum VB 6 et antérieur
    Réponses: 1
    Dernier message: 21/02/2007, 18h44
  4. Réponses: 2
    Dernier message: 21/01/2006, 23h47
  5. Conversion chiffres en toutes lettres
    Par jouda dans le forum Langage
    Réponses: 2
    Dernier message: 11/11/2005, 18h58

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo