Discussion :

[docjo]

bonjour

j'ai essayé d'appliquer le module donné par microsoft (ici ) pour calculer la différence entre 2 dates et heure du style

01/01/08 12:30 et 03/01/08 01:00

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 '------------------------------------------------------------------
 ' This function calculates the elapsed time between two values and
 ' formats the result in four different ways.
 '
 ' The function accepts interval arguments such as the following:
 '
 '    #5/12/95 6:00:00AM# - #5/11/95 10:00:00PM#
 '
 '    -or-
 '
 '    [End Time]-[Start Time] 
'------------------------------------------------------------------
 Function ElapsedTime (Interval)
   Dim x
   x = Int(CSng(Interval * 24 * 3600)) & " Seconds"
   Debug.Print x
   x = Int(CSng(Interval * 24 * 60)) & ":" & Format(Interval, "ss") _
      & " Minutes:Seconds"
   Debug.Print x
   x = Int(CSng(Interval * 24)) & ":" & Format(Interval, "nn:ss") _
      & " Hours:Minutes:Seconds"
   Debug.Print x
   x = Int(CSng(Interval)) & " days " & Format(Interval, "hh") _
      & " Hours " & Format(Interval, "nn") & " Minutes " & _
      Format(Interval, "ss") & " Seconds"
   Debug.Print x
 
 End Function

Ca marche si la différence est dans la même journée mais par s'il existe plusieurs jours d'écart.
voilà le résultat de l'exemple que je vous ai donné plus haut

? ElapsedTime(#03/01/08 01:00#-#01/01/08 12:30#)
5142600 Seconds
85710:00 Minutes:Seconds
1428:30:00 Hours:Minutes:Seconds
59 days 12 Hours 30 Minutes 00 Seconds

Je pense qu'il n'y a pas 59 jours entre ces 2 dates !

Pouvez-vous m'aider ?

Merci d'avance

[6ril25]

Salut,

si c'est possible, si

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ElapsedTime(#03/01/08 01:00#-#01/01/08 12:30#)

est au format anglais:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ElapsedTime(#Mois/Jour/Année 01:00#-#Mois/Jour/Année 12:30#)

[docjo]

et on ne peut pas appliquer ce code pour des dates au format français ?