Fonction DatePart

Renvoie la partie spécifiée d'une date donnée.

Syntaxe

DatePart(interval, date)

Arguments :

• interval : requis. Expression de chaîne représentant l'intervalle de temps à renvoyer. Pour connaître les valeurs, reportez-vous à la section Paramètres.
• date : requis. Expression de date à évaluer.

Paramètres : l'argument interval peut avoir les valeurs ci-après.

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 DatePart pour évaluer une date et renvoyer un intervalle de temps spécifique. Par exemple, vous pouvez utiliser DatePart pour calculer le jour de la semaine ou l'heure actuelle.

L'exemple suivant prend une date et, à l'aide de la fonction DatePart, affiche le trimestre de l'année duquel elle relève.

Exemple 1 :

Function GetQuarter(TheDate)
GetQuarter = DatePart("q", TheDate)
End Function

Exemple 2 :

Dim MyDate, YearPart
MyDate = "21/01/2025"
YearPart = DatePart("yyyy", MyDate)
'Output: 2025

Exemple 3 :

Dim MyDate, MonthPart
MyDate = "21/01/2025"
MonthPart = DatePart("m", MyDate) 
'Output: MonthPart contains 1 (January)

Exemple 4 :

Dim MyDate, DayPart
MyDate = "21/01/2025"
DayPart = DatePart("d", MyDate) 
'Output: 21

Exemple 5 :

Dim MyDate, HourPart
MyDate = "21/01/2025 14:30:00" ' Includes time component.
HourPart = DatePart("h", MyDate) 
'Output: 14 (2 PM)

Exemple 6 :

Dim MyDate, MinutePart
MyDate = "21/01/2025 14:30:00" 
MinutePart = DatePart("n", MyDate) 
'Output: 30

Exemple 7 :

Dim MyDate, SecondPart
MyDate = "21/01/2025 14:30:00" ' Includes time component.
SecondPart = DatePart("s", MyDate) ' Returns the second part of the date.
'Output: 0