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 :

Format de date par macro


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
    Ingénieur développement logiciels
    Inscrit en
    Mars 2008
    Messages
    464
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 42
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : Ingénieur développement logiciels
    Secteur : Bâtiment Travaux Publics

    Informations forums :
    Inscription : Mars 2008
    Messages : 464
    Par défaut
    Bonjour,
    Je suis tombé sur, ce que je considère comme un bug excel, même si je pense que je ne dois pas être le premier à tomber dessus.

    Il s'agit d'un format de date qu'indépendamment des options de régionalités du système d'exploitation, et des formats de date des cellules par défaut, Excel interprête en Français et les traduit en Anglais.

    Pour reproduire le bug il faut faire :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    Wb.Sheets("Feuil1").Cells(UneLigne,UneColonne).Value = Wb.Sheets("Feuil1").Cells(UneAutreLigne,UneAutreColonne).Value
    Bien évidemment dans mon cas Wb est un Workbook et UneLigne, UneColonne, UneAutreLigne, UneAutreColonne sont des entiers.

    Si votre format de date est du type jj/mm/aaaa dans la cellule à la ligne UneLigne et à la colonne UneColonne, la macro vous la traduire sous le forme mm/jj/aaaa dans la cellule de la ligne UneAutreLigne et de la colonne UneAutreColonne.

    Il y a maintenant un moyen de contourner ce phénomène (or la possibilité d'extraire le mois, le jour et l'année de la chaine de caractère source et de la reconstituer dans la chaine de caractère cible), c'est d'utiliser la fonction CDate

    Dans mon exemple :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    Wb.Sheets("Feuil1").Cells(UneLigne,UneColonne).Value = CDate(Wb.Sheets("Feuil1").Cells(UneAutreLigne,UneAutreColonne).Value)
    J'interprête ça comme si Excel pense que la cellule source est une chaine de caractère, qu'il a reconnu implicitement comme un format de date et qu'il l'a donc traduit dans le format date dans la cellule cible mais ce que je trouve curieux c'est qu'indépendamment de l'option de régionalité du système d'exploitation et même si le format de la cellule cible est Date française, il la traduit en format de date anglaise sauf si le jour dépasse 12 ( à ce moment là il ne peut y avoir ambiguité)

    Je précise, car ça peut avoir son importance, que j'ai remarqué le comportement bizarre sur Excel 2003. Peut être que depuis sur 2007 ou 2010, le comportement a évolué

  2. #2
    Expert confirmé
    Homme Profil pro
    aucune
    Inscrit en
    Septembre 2011
    Messages
    8 208
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : aucune

    Informations forums :
    Inscription : Septembre 2011
    Messages : 8 208
    Par défaut
    Bonjour,

    Excel utilise les options régionales. Pas VBA qui ne cause qu'américain. Ce n'est pas un bug mais le mélange des deux peut parfois surprendre celui qui n'a pas ce qui précède en tête.

  3. #3
    Modérateur
    Avatar de AlainTech
    Homme Profil pro
    Consultant informatique
    Inscrit en
    Mai 2005
    Messages
    4 235
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 71
    Localisation : Belgique

    Informations professionnelles :
    Activité : Consultant informatique
    Secteur : Finance

    Informations forums :
    Inscription : Mai 2005
    Messages : 4 235
    Par défaut
    Bonjour,

    Je pense que tu ne nous dis pas tout.

    Je suis prêt à parier que ton fichier source est un fichier de type csv et donc, texte pur.

    VBA va donc essayer d'interpréter le contenu de ce texte et, quand il rencontre ce qui ressemble à une date, va tenter de le convertir en une date Excel.

    Tu pourras remarquer qu'après le 12 de chaque mois, tout redevient "normal" car il n'existe pas de mois plus grand que 12.

    Il n'y a donc aucun bug.
    L'utilisation de CDate force VBA à convertir en tenant compte des options régionales.
    N'oubliez pas de cliquer sur quand vous avez obtenu ou trouvé vous-même la réponse à votre question.
    Si vous trouvez seul, pensez à poster votre solution. Elle peut servir à d'autres!
    Pensez aussi à voter pour les réponses qui vous ont aidés.
    ------------
    Je dois beaucoup de mes connaissances à mes erreurs!

  4. #4
    Expert confirmé
    Avatar de kiki29
    Homme Profil pro
    ex Observeur CGG / Analyste prog.
    Inscrit en
    Juin 2006
    Messages
    6 132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : ex Observeur CGG / Analyste prog.

    Informations forums :
    Inscription : Juin 2006
    Messages : 6 132

Discussions similaires

  1. Comment changer le format de date par défaut ?
    Par Christophe P. dans le forum Administration
    Réponses: 2
    Dernier message: 07/07/2015, 17h46
  2. Sélection d'une plage de dates par macro très lente
    Par yvesduc dans le forum QlikView
    Réponses: 1
    Dernier message: 11/03/2010, 15h48
  3. Migration de 8i en 10g : Format de date par défaut différent
    Par Titouf dans le forum Administration
    Réponses: 13
    Dernier message: 09/08/2008, 09h11
  4. Format des dates par API Crystal XI
    Par Gerard_38000 dans le forum SAP Crystal Reports
    Réponses: 1
    Dernier message: 12/11/2007, 14h39
  5. Problème de format de date par défaut
    Par anitshka dans le forum Langage
    Réponses: 4
    Dernier message: 31/07/2006, 12h22

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