Fonction DateDiff

Renvoie le nombre d'intervalles entre deux dates.

Syntaxe

DateDiff(interval, date1, date2)

Arguments :

  • interval : requis. Expression de chaîne représentant l'intervalle à utiliser pour calculer l'écart entre date1 et date2. Pour connaître les valeurs, reportez-vous à la section Paramètres.
  • date1, date2 : requis. Expressions de date. Il s'agit des deux dates à utiliser dans le calcul.
Paramètres : l'argument interval peut avoir les valeurs ci-après.

Tableau 11-10 Valeurs de l'argument interval

Paramètre Description
yyyy Année
q Trimestre
m Mois
d Jour
w Jour de la semaine
h Heure
n Minute
s Seconde

Formats de date pris en charge :

  • MM-DD-YYYY
  • MM/DD/YYYY
  • DD-MM-YYYY
  • DD/MM/YYYY
  • YYYY-MM-DD
  • YYYY/MM/DD

Format d'heure pris en charge :

hh:mm:ss

Remarques

Vous pouvez utiliser la fonction DateDiff pour déterminer le nombre d'intervalles de temps spécifiés entre deux dates. Par exemple, vous pouvez utiliser DateDiff pour calculer le nombre de jours entre deux dates.

Pour calculer le nombre de jours entre date1 et date2, vous pouvez utiliser le paramètre de jour ("d"). Si date1 fait référence à un point dans le temps postérieur à date2, la fonction DateDiff renvoie un nombre négatif.

Lorsque vous comparez le 31 décembre au 1er janvier de l'année suivante, DateDiff renvoie 1 pour le paramètre d'année ("yyyy"), même si un seul jour s'est écoulé.

L'exemple suivant utilise la fonction DateDiff pour afficher le nombre de jours entre une date donnée et la date du jour :

Exemple 1 :

Function DiffADate(theDate)
DiffADate = "Days from today: " & DateDiff("d", Now, theDate)
End Function

Exemple 2 :

Dim StartDate, EndDate, Difference
StartDate = "01/01/2025"
EndDate = "21/01/2025"
Difference = DateDiff("d", StartDate, EndDate) 
'Output: 20

Exemple 3 :

Dim StartDate, EndDate, Difference
StartDate = "01/01/2020"
EndDate = "01/01/2025"
Difference = DateDiff("yyyy", StartDate, EndDate) 
'Output: 5

Exemple 4 :

Dim StartDate, EndDate, Difference
StartDate = "21/01/2025"
EndDate = "21/03/2025" 
Difference = DateDiff("m", StartDate, EndDate)
'Output: 2

Exemple 5 :

Dim StartDate, EndDate, Difference
StartDate = "21/01/2025 08:00:00" ' Includes time component.
EndDate = "21/01/2025 18:00:00"   ' Includes time component.
Difference = DateDiff("h", StartDate, EndDate) 
'Output: 10

Exemple 6 :

Dim StartDate, EndDate, Difference
StartDate = "21/01/2025 08:00:00" ' Includes time component.
EndDate = "21/01/2025 08:45:00"   ' Includes time component.
Difference = DateDiff("n", StartDate, EndDate) 
'Output: 45

Exemple 7 :

Dim StartDate, EndDate, Difference
StartDate = "21/01/2025 08:45:00" ' Includes time component.
EndDate = "21/01/2025 08:45:50"   ' Includes time component.
Difference = DateDiff("s", StartDate, EndDate) 
'Output: 50