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

Macros et VBA Excel Discussion :

Saisie format monétaire dans un tableau via un textbox


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Homme Profil pro
    instituteur
    Inscrit en
    Juillet 2018
    Messages
    617
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 35
    Localisation : Côte d'Ivoire

    Informations professionnelles :
    Activité : instituteur
    Secteur : Enseignement

    Informations forums :
    Inscription : Juillet 2018
    Messages : 617
    Par défaut Saisie format monétaire dans un tableau via un textbox
    Bjr à vous.
    ''Si le sujet a été traité, veuillez me donner le lien''
    J'ai tourné un peu sur les forums mais je n'arrive pas à trouver une fenêtre de sortie.
    J'ai un tableau que je remplis via un formulaire. Le format monétaire de mes textbox marche par contre dans le tableau lorsque je fais le calcul sans la macro , il affiche #valeur! et quand je vérifie l'erreur il est marqué ''6500cfa"-"1256 cfa''. Donc ce qui veut dire que c'est au format texte donc impossible de faire le calcul.
    Je remplis mon tableau avec ce code
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    dim lig
    With sheets("BD")
    .listobjects("tab").listrows.add
    Lig=.range("a"&rows.count).End(xlup).row
    .range("e"& lig)=t.paye
    Comment faire pour que mes trois colonnes (payé,reste et à payer) soient au format monétaire lors de la saisie afin qu' à la récupération celles ci puissent se retrouver dans mes textbox et listbox. Merci

  2. #2
    Membre Expert Avatar de Thautheme
    Homme Profil pro
    salarié
    Inscrit en
    Août 2014
    Messages
    1 373
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 64
    Localisation : France, Hérault (Languedoc Roussillon)

    Informations professionnelles :
    Activité : salarié

    Informations forums :
    Inscription : Août 2014
    Messages : 1 373
    Par défaut
    Bonjour Ashati, bonjour le forum,

    Il te faut renvoyer le même format dans la cellule :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
    dim lig
    With sheets("BD")
    .listobjects("tab").listrows.add
    Lig=.range("a"&rows.count).End(xlup).row
    .range("e"& lig)=t.paye
    .range("e" & lig).NumberFormat = "#,##0.00 $" 'par exemple

  3. #3
    Membre éclairé
    Homme Profil pro
    instituteur
    Inscrit en
    Juillet 2018
    Messages
    617
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 35
    Localisation : Côte d'Ivoire

    Informations professionnelles :
    Activité : instituteur
    Secteur : Enseignement

    Informations forums :
    Inscription : Juillet 2018
    Messages : 617
    Par défaut
    Merci énormément. J'ai tout essayé sans penser à ça . C'est le même type de code avec le format hyperlien. Merci

  4. #4
    Membre éclairé
    Homme Profil pro
    instituteur
    Inscrit en
    Juillet 2018
    Messages
    617
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 35
    Localisation : Côte d'Ivoire

    Informations professionnelles :
    Activité : instituteur
    Secteur : Enseignement

    Informations forums :
    Inscription : Juillet 2018
    Messages : 617
    Par défaut
    Je me demande si calculer manuellement avec la fonction soustraction dans le tableau est une meilleure idée. J'ai mis le code mais quand je fais la soustraction il y a toujours '' #valeur!.
    Pour le code des additions,je ne les maîtrises pas convenablement. Donc c'est un peu galère pour moi.
    Merci

  5. #5
    Membre éclairé
    Homme Profil pro
    instituteur
    Inscrit en
    Juillet 2018
    Messages
    617
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 35
    Localisation : Côte d'Ivoire

    Informations professionnelles :
    Activité : instituteur
    Secteur : Enseignement

    Informations forums :
    Inscription : Juillet 2018
    Messages : 617
    Par défaut
    J'ai essayé avec ce code d'addition pour vérifier ma saisie (je ne sais toujours utiliser le code de soustraction)
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    .range("g"&i)=CInt(application.worksheetfunction.sum(range("E:F")))
    mais dans colonne G, il est marqué 0fcfa alors que j'ai fait 6500fcfa+1200fcfa.

Discussions similaires

  1. [D6] Spécifier format monétaire dans Excel ?
    Par Lung dans le forum Delphi
    Réponses: 9
    Dernier message: 03/09/2019, 15h05
  2. format monétaire dans une colone listview ?
    Par sauceaupistou dans le forum VB 6 et antérieur
    Réponses: 1
    Dernier message: 27/06/2007, 15h24
  3. Réponses: 5
    Dernier message: 10/11/2006, 11h00
  4. ecrire des valeurs dans un tableau via formulaire
    Par kenny49 dans le forum Général JavaScript
    Réponses: 3
    Dernier message: 07/07/2006, 10h23
  5. Format monétaire dans un DBedit
    Par cdlr27 dans le forum Bases de données
    Réponses: 8
    Dernier message: 28/04/2004, 16h41

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