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 :

userform Nouveaux collegues [XL-2010]


Sujet :

Macros et VBA Excel

  1. #1
    Membre très actif Avatar de pilounet54
    Homme Profil pro
    retraité
    Inscrit en
    Février 2008
    Messages
    489
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 72
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : retraité
    Secteur : Service public

    Informations forums :
    Inscription : Février 2008
    Messages : 489
    Par défaut userform Nouveaux collegues
    bonjour
    je cherche à mettre deux chiffres apres la vircule
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Nouveaux_collegues.Val (Me.Label40.Caption), "# ##0.00" = Sheets("Cotisations").Range("Q6").Value
    dans userform Nouveaux_collegues
    merci

  2. #2
    Expert confirmé Avatar de jfontaine
    Homme Profil pro
    Contrôleur de Gestion
    Inscrit en
    Juin 2006
    Messages
    4 756
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 52
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 756
    Par défaut
    Re,

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Nouveaux_collegues.Val (Me.Label40.Caption), "# ##0.00" = Sheets("Cotisations").Range("Q6").Valu
    Ou la, tu nous a fait un beau méli-mélo

    Que vient faire le = au milieu de cette ligne?
    Il manque l'instruction Format pour aller avec le type de format.
    A quoi correspond Nouveaux_collegues.Val?

  3. #3
    Membre très actif Avatar de pilounet54
    Homme Profil pro
    retraité
    Inscrit en
    Février 2008
    Messages
    489
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 72
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : retraité
    Secteur : Service public

    Informations forums :
    Inscription : Février 2008
    Messages : 489
    Par défaut
    je fais du trico avec le vba quelque fois cela fonctionne ...trés trés rarement
    le "val" ok n'a rien a foutre là par contre le format comment tu le mets
    donc je souhaite recuperer la valeur d'une cellule avec le userform et le label au format

  4. #4
    Expert confirmé Avatar de jfontaine
    Homme Profil pro
    Contrôleur de Gestion
    Inscrit en
    Juin 2006
    Messages
    4 756
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 52
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 756
    Par défaut
    C'est peut être cela que tu veux
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Nouveaux_collegues.Label40.Caption = Format(Sheets("Cotisations").Range("Q6").Value, "# ##0.00")

  5. #5
    Membre éclairé Avatar de nchal
    Homme Profil pro
    Étudiant
    Inscrit en
    Avril 2012
    Messages
    512
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 32
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Avril 2012
    Messages : 512
    Par défaut
    Bonjour pilounet,

    Je tiens particulièrement à te féliciter pour ton effort envers la langue française

    Et sinon, inspire toi de ce bout de code :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Sub format()
     
    ActiveCell.NumberFormat = "#,##0.00"
     
    End Sub
    EDIT: J'avais pas vu que fontaine avait déjà repondu, et d'une meilleure façon

  6. #6
    Membre très actif Avatar de pilounet54
    Homme Profil pro
    retraité
    Inscrit en
    Février 2008
    Messages
    489
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 72
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : retraité
    Secteur : Service public

    Informations forums :
    Inscription : Février 2008
    Messages : 489
    Par défaut
    merci pour tes encouragements es que je mets un s ? le code que tu m'a donne c'est une vrai mine d'or merci encore

    c'est le format dans le label si possible .

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

Discussions similaires

  1. [XL-2010] Nouveaux collegues multipages
    Par pilounet54 dans le forum Macros et VBA Excel
    Réponses: 0
    Dernier message: 11/06/2012, 13h05
  2. Outils, cours et NOUVEAUX tutoriels pour Borland C++Builder
    Par hiko-seijuro dans le forum C++Builder
    Réponses: 10
    Dernier message: 12/03/2006, 22h33
  3. [VBA EXCEL] Réduire/Agrandir UserForms
    Par Fench dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 06/11/2003, 16h02

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