VB probléme de Date avec Excel
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
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
Configuration: Windows XP Internet Explorer 7.0
4 réponses
-
Bonjour,
Il faut aller dans Format -> Cellule -> Nombre -> Date et choisir le format d'affichage que tu désires.
;o) -
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 VBColumns("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 -
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) -
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
