Convertir Serial date a une date format YYYY-MM-dd

Résolu
BrokenArrow29 Messages postés 110 Date d'inscription vendredi 1 décembre 2006 Statut Membre Dernière intervention 14 décembre 2011 - 9 févr. 2009 à 06:49
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 10 févr. 2009 à 06:30
Salut tout le monde,
J'aimerais bien trouvé une fonction pour convertir une date de format serial 39794 a 2008-12-12

Merci et bonne journée
A voir également:

6 réponses

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 71
9 févr. 2009 à 11:35
j'ai même trouvé plus court :

TextBox1.Text = DateTime.FromOADate(39794)
3
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 71
9 févr. 2009 à 07:08
y'a une partie convertion, pour obtenir un DateTime valide, puis un formatage pour obtenir yyyy-MM-dd :

Dim dat As New DateTime(1899, 12, 30)

dat = dat.AddDays(39794)
MsgBox(dat.ToString("yyyy-MM-dd"))
0
cs_comme Messages postés 122 Date d'inscription dimanche 19 mars 2006 Statut Membre Dernière intervention 18 juillet 2009
9 févr. 2009 à 11:00
Essaye celà  :  Label1.Caption = CDate(39794)
0
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 71
9 févr. 2009 à 11:05
Où comment coder du code .NET invalide.
l'as tu toi même essayé ?

"Erreur: Une valeur de type 'Integer' ne peut pas être convertie en 'Date'."

ton code est valable en VB6, il faudrait simplement que tu formate le résultat comme demandé.

concernant mon code, il est fondé:
39794 est un Double, correspondant au nombre de jours écoulés depuis le 30 décembre 1899 à minuit.
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
BrokenArrow29 Messages postés 110 Date d'inscription vendredi 1 décembre 2006 Statut Membre Dernière intervention 14 décembre 2011 1
10 févr. 2009 à 02:43
Merci Renfield,
super cool ta fonction !!!!

Merci
0
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 71
10 févr. 2009 à 06:30
y'a plus qu'a combiner les deux:

TextBox1.Text = DateTime.FromOADate(39794).ToString("yyyy-MM-dd")
0