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 :

Problème de format de date dans textebox


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Profil pro
    Inscrit en
    Août 2007
    Messages
    412
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Août 2007
    Messages : 412
    Par défaut Problème de format de date dans textebox
    re

    jai une datte qui remonte d'une feuil dans un textbox1 sur mon userform

    exemple 01/01/2016

    j'aimerais qu'il affiche l'abregé du jour de cette date dans mon exemple vendredi donc ven

    voici mon code qui ne marche pas

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
     
     TextBox1.Value = Format(TextBox1.Value, "ddd")
    merci de m'aiguiller car j'ai fait le tour de pas mal de forum mais je n'ai pas trouvé

  2. #2
    Membre éprouvé Avatar de defluc
    Homme Profil pro
    Architecte
    Inscrit en
    Mai 2002
    Messages
    1 383
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 76
    Localisation : Belgique

    Informations professionnelles :
    Activité : Architecte

    Informations forums :
    Inscription : Mai 2002
    Messages : 1 383
    Par défaut
    C'est au moment où tu places la valeur dans la listbox qu'il faut appliquer le format
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
     TextBox1.Value = Format(Cells(1, 1), "ddd")

  3. #3
    Membre éclairé
    Profil pro
    Inscrit en
    Août 2007
    Messages
    412
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Août 2007
    Messages : 412
    Par défaut
    Merci ca marche bien par contre je ne sais pas pourquoi il me met un point a la fin grande question.

    sinon pour un second textbox pareil c'est le meme code code celui ci ?

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
        TextBox2.Value = Format(Cells(1, 2), "ddd")
    parce que j'en aurais 30 a faire comme ca

  4. #4
    Membre éprouvé Avatar de defluc
    Homme Profil pro
    Architecte
    Inscrit en
    Mai 2002
    Messages
    1 383
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 76
    Localisation : Belgique

    Informations professionnelles :
    Activité : Architecte

    Informations forums :
    Inscription : Mai 2002
    Messages : 1 383
    Par défaut
    En bon français, un écrit en abréviation doit se terminer par un point.
    sinon pour un second textbox pareil c'est le meme code code celui ci ?
    Si tous les TextBox sont dans le même UserForm et que la valeur à y mettre provient de la même cellule, les TextBoxes peuvent tous être remplis en une seule opération. Voir documentation de l'instruction For Each

Discussions similaires

  1. Réponses: 3
    Dernier message: 02/04/2013, 09h31
  2. [AC-2007] Problème de format de date érronné lors de l'insertion dans une table
    Par dumas.blr dans le forum VBA Access
    Réponses: 3
    Dernier message: 07/04/2011, 15h32
  3. [oracle][delphi] Problème format de date dans une requete
    Par le_parrain dans le forum Bases de données
    Réponses: 1
    Dernier message: 21/07/2005, 10h12
  4. [VBA] Pb de format des dates dans un état
    Par linda15975 dans le forum IHM
    Réponses: 45
    Dernier message: 21/06/2005, 14h49
  5. Problème de Format de date
    Par titititi007 dans le forum MS SQL Server
    Réponses: 2
    Dernier message: 18/06/2003, 08h19

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