Sujet Précédent Sujet Suivant

Excel : Convertir date décimale en MM/JJ/HH/m

Résolu/Fermé
mustang - 14 juil. 2008 à 11:35
 mustang - 14 juil. 2008 à 14:23
Bonjour,

Existe-t-il un moyen simple de résoudre ce problème :

J'ai une série de dates :

prenons par exemple :

1997.765

La première partie, avant le point, représente l'année. Il suffit donc de séparer les deux parties pour avoir déjà l'année.

IL nous reste 0.765 qui est une fraction de l'année.

Pour savoir le jour, il faut donc multiplier par 365 OU 366 si c'est une année bisextile.

Ensuite il faut diviser par 30 ou 31 en fonction du nombre de jours dans le mois, et c'est là que ça se corse.

Avez-vous une idée ou un programme qui résolve ce pb ?
A voir également:

2 réponses

Réponse 1 / 2
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
14 juil. 2008 à 11:44
Bonjour,
Avec quel language ?
A+
0
mustang
14 juil. 2008 à 13:08
Je travaille sous excel
0
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190 > mustang
14 juil. 2008 à 13:35
Oui, c'est dans ton titre, mais en VBA ou par des formules ?
Mon avis faut passer par du VBA, mais il y a des amis sur CCM qui sont super fort en formule (pas moi)
0
Réponse 2 / 2
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
14 juil. 2008 à 14:08
Mais avec VBA... 
Function CodeJour() As String
Dim B As Double
Dim An As Integer
Dim Reste As Single
Dim Da1 As Long, Da2 As Long
Dim MaDate As Date

    Sheets("Feuil1").Select
    B = Cells(1, 1).Value
    An = Int(B)
    Reste = B - An
    Da1 = DateSerial(An, 1, 1)
    Da2 = DateSerial(An, 12, 31)
    MaDate = Da1 + ((Da2 - Da1 + 1) * Reste) + 1
    Cells(1, 2).Value = MaDate
End Function


Mettre le nombre en A1 (1997,765) résultat en B1 = 8/10/1997 5:24:00
Sais pas si c'est ca que tu cherche ?
A+
-1
mustang
14 juil. 2008 à 14:23
C'est ça dont j'avais besoin.

Merci beaucoup!
0