[XL-2000] Probleme de dates [Résolu]

[soccersoft]

Bonjour,

Je commence en VBA et je rencontre des problèmes de dates...malgré pas mal de recherches.

J'importe des données dans un fichier excel et dans une colonne figure des dates dont le format m'est imposé

26/Aug/2011 13:10:40

mais je ne parviens pas à récupérer les dates de cette colonne et à la transformer en format date...j'ai tenté avec les fonctions CDate et format mais sans succès...c'est le mois qui semble poser probleme...

par contre quand je le mets entre diese, la saisie automatique de l'editeur de VB le transforme direct en format US....c'est donc qu'il doit y avoir une possibilité de la transformer en date...

En gros, voilà ce qui ne marche pas...il s'agit d'un test simplifié parmi un paquet que j'ai fait...

Code :

1
2
3
4
5
6
7
8
 
Dim DateTemp As Date
 
For dI = 1 To 65000
 
DateTemp = CDate(Cells(6 + dI, 1))
 
Next dI

cordialement

[Ormonth]

Bonjour,

Postulat : avec à l'origine 26/Aug/2011 13:10:40 dans cell active qui se retrouve en format texte de base..

Code :

1
2
3
4
Sub gogo()
 
ActiveCell = Format(ActiveCell, "jj/mm/aaaa hh:mm:ss")
End Sub

Comprendre et gérer les dates sous Excel et en VBA

cordialement,

Ps : si question résolue, pensez à la taguer résolue, et selon que technique = OK ou pas => cliquez sur les pouces

Didier

[soccersoft]

merci, ça marche. Le pire c'est que je n'étais pas loin, comme dit dans mon post précédent, j'avais fait des tests avec format et cdate suite à la lecture de votre cours justement !

Je m'étais trompé, j'avais fait ça

Code :

1
2
3
Dim sDate As String
sDate = "1/Aug/2004 13:10:58"
sDate = Format(sDate, "dd/mm/yyyy hh:nn:ss")

je n'étais pas trop loin...!