VB probléme de Date avec Excel

jijudu Messages postés 211 Date d'inscription   Statut Membre Dernière intervention   -  
jijudu Messages postés 211 Date d'inscription   Statut Membre Dernière intervention   -
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

Réponse 1 / 4
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
Bonjour,

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

;o)
0
Réponse 2 / 4
jijudu Messages postés 211 Date d'inscription   Statut Membre Dernière intervention   3
 
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
Réponse 3 / 4
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
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
Réponse 4 / 4
jijudu Messages postés 211 Date d'inscription   Statut Membre Dernière intervention   3
 
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