VB probléme de Date avec Excel

Fermé
jijudu Messages postés 211 Date d'inscription jeudi 15 mai 2008 Statut Membre Dernière intervention 3 septembre 2009 - 6 mai 2009 à 12:20
jijudu Messages postés 211 Date d'inscription jeudi 15 mai 2008 Statut Membre Dernière intervention 3 septembre 2009 - 6 mai 2009 à 17:39
Bonjour,


1- J'ouvre mon fichier txt (où se trouvent des date en anglais sous la forme mm/jj/aaaa hh:nn:ss AM ou PM)
2- Dans les cases d'Excel les dates s'affichent sous cette forme : mm/jj/aaaa hh:nn:ss AM ou PM==> Donc comme sur le fichier txt(Tout va bien)
3- je fais de la mise en forme pour avoir la date en FRANCAIS j'obtiens : jj/mm/aaaa hh:nn:ss MA date se trouve dans une VAriable
4- J'affiche ma variable dans une case d'Excel ET Là MAGIE !!!!!!!! :
Excel ne me met pas là date comme je l'ai ordonné : jj/mm/aaaa hh:nn:ss
Mais me la remet en anglais .... : mm/jj/aaaa hh:nn:ss


Poutant dans option régionaux tout est bien en francais ....

merci
A voir également:

4 réponses

Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
6 mai 2009 à 12:30
Bonjour,

Il faut aller dans Format -> Cellule -> Nombre -> Date et choisir le format d'affichage que tu désires.

;o)
0
jijudu Messages postés 211 Date d'inscription jeudi 15 mai 2008 Statut Membre Dernière intervention 3 septembre 2009 3
6 mai 2009 à 12:47
Merci pour ta réponse
Ah d'accord je vois à peut prés ce que tu veux dire => j'accéde à ces options en faisant clique gauche.

Je l'ai écrit en VB
Columns("B:B").Select
Selection.NumberFormat = "dd/mm/yyyy hh:mm:ss"

mais cela ne change rien est ma date garde toujours cette forme : mm/jj/aaaa hh:nn:ss


Merci
0
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
6 mai 2009 à 13:17
tu dis dans ton premier post que la date est transformée et stockée dans une variable. Je suppose que tu fais ensuite comme ça :
Worksheets(1).Range("B2").Value = maVariableDate

As-tu essayé en faisant ? :
Worksheets(1).Range("B2").Value = CStr(maVariableDate)


;o)
0
jijudu Messages postés 211 Date d'inscription jeudi 15 mai 2008 Statut Membre Dernière intervention 3 septembre 2009 3
6 mai 2009 à 17:39
Yep Polux31 :

Bien pensé la méthode : CStr(maVariableDate)
Mais malheuresement cela ne marche pas (GRRRRRRrrrrr.... :-) et il persiste tjrs à me mettre la date sous la forme : mm/jj/aaaa hh:nn:ss

MAIS j'ai l'impression d'avoir trouvé la solution ...........
Comme je te l'ai dis j'avais mis ce code :
Cells(2,2).Select
Selection.NumberFormat = "dd/mm/yyyy hh:mm:ss"

Mais sans Effet .........

Alors qu'on mettant ce code :
Cells(2, 2) = Format(Cells(2, 2), "dd-mm-yyyy hh:nn:ss")

CA MARCHE parfaitement maintenant .....

Voilà
A+ et merci
0