Fonction DatePart

Avertissement

Il existe un problème avec l’utilisation de cette fonction. Le dernier lundi de certaines années civiles peut être retourné en tant que semaine 53 alors qu’il devrait être la semaine 1. Pour plus d’informations et une solution de contournement, consultez Les fonctions Format ou DatePart peuvent retourner un numéro de semaine incorrect pour le dernier lundi de l’année. Retourne une valeur de type Variant (Integer) contenant l’élément spécifié d’une date donnée.

Syntaxe

DatePart(interval, date, [ firstdayofweek, [ firstweekofyear ]])

La syntaxe de la fonction DatePart comprend les arguments nommés suivants :

Élément Description
interval Obligatoire. Expression de chaîne correspondant à l’intervalle de temps à retourner.
date Obligatoire. Valeur Variant (Date) à évaluer.
firstdayofweek Facultatif. Constante indiquant le premier jour de la semaine. Si ce n’est pas précisé, Dimanche est utilisé par défaut.
firstweekofyear Facultatif. Constante spécifiant la première semaine de l’année. Si ce ne pas spécifié, la première semaine est par défaut la semaine dans laquelle se trouve le 1er janvier.

Paramètres

L’argumentinterval a les paramètres suivants :

Paramètre Description
yyyy Année
q Trimestre
m Mois
y Jour de l’année
d Jour
w Jour de la semaine
ww Semaine
h Heure
n Minute
s Deuxième

firstdayofweek a les paramètres suivants :

Constante Valeur Description
vbUseSystem 0 Utilise le paramètre API NLS.
vbSunday 1 Dimanche (par défaut))
vbMonday 2 Lundi
vbTuesday 3 Mardi
vbWednesday 4 Mercredi
vbThursday 5 Jeudi
vbFriday 6 Vendredi
vbSaturday 7 Samedi

L’argument firtweekofyear peut prendre les valeurs suivantes :

Constante Valeur Description
vbUseSystem 0 Utilise le paramètre API NLS.
vbFirstJan1 1 Commence par la semaine qui contient le 1er janvier (par défaut ).
vbFirstFourDays 2 Commence par la première semaine contenant au moins quatre jours dans la nouvelle année.
vbFirstFullWeek 3 Commence par la première semaine complète de l’année.

Remarques

Utilisez la fonction DatePart pour évaluer une date et retourner un intervalle de temps spécifique. Par exemple, utilisez la fonction DatePart pour calculer le jour de la semaine ou l’heure actuelle.

L’argument firstdayofweeka une incidence sur les calculs utilisant les symboles d’intervalle « s » et « ss ».

Si date est un littéral date, l’année précisée devient un élément permanent de cette date. Toutefois, si date apparaît entre guillemets (" ") et que vous n’indiquez pas l’année, l’année actuelle est insérée automatiquement chaque fois que l’expression date est évaluée. Cela permet d’écrire du code qui peut être utilisé pour d’autres années.

Remarque

Pour date, si la valeur de la propriété Calendrier est grégorien, la date fournie doit être grégorienne. Si le calendrier est hégirien, la date fournie doit être de ce type.

La partie de la date retournée est exprimée en unités périodiques du calendrier arabe actuel. Si, par exemple, le calendrier actuel est du type hégirien et que la partie de la date à retourner est l’année, la valeur obtenue correspond à une année hégirienne.

Exemple

Cet exemple prend une date et, à l’aide de la fonction DatePart, affiche le trimestre de l’année correspondant.

Dim TheDate As Date    ' Declare variables.
Dim Msg    
TheDate = InputBox("Enter a date:")
Msg = "Quarter: " & DatePart("q", TheDate)
MsgBox Msg

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.

Les fonctions Format ou DatePart peuvent renvoyer un numéro de semaine incorrect pour le dernier lundi de l’année