Renvoie une donnée de type Variante (Entier) contenant la partie spécifiée d’une date donnée.
|
AVERTISSEMENT Il y a un problème avec l’utilisation de cette fonction. Le dernier lundi de certaines années civiles peut être renvoyé comme semaine 53 alors qu’il devrait être semaine 1. Pour plus d’informations et une solution de contournement, voir les fonctions format ou PartDate peuvent renvoyer un numéro de semaine incorrect pour le dernier lundi de l’année. |
Syntaxe
DatePart ( intervalle, date [, premierjoursem] [, FirstWeekOfYear] )
La syntaxe de la fonction PartDate comporte les arguments suivants :
Argument | Description |
|---|---|
|
intervalle |
Obligatoire. Expression de chaîne qui est l’intervalle de temps que vous voulez renvoyer. |
|
date |
Obligatoire. Valeur de type variante (Date) que vous souhaitez évaluer. |
|
premierjoursem |
Facultatif. constante spécifiant le premier jour de la semaine. Dimanche est le jour par défaut. |
|
premièresem |
Facultatif. Constante spécifiant la première semaine de l’année. Si celle-ci n’est pas spécifiée, la semaine où intervient le 1er janvier sera utilisée par défaut. |
Paramètres
L’argument Interval peut avoir les valeurs suivantes :
Paramètre | Description |
|---|---|
|
aaaa |
Année |
|
q |
Trimestre |
|
m |
Mois |
|
y |
Jour de l’année |
|
j |
Jour |
|
w |
Weekday |
|
ss |
Semaine |
|
h |
Heure |
|
n |
Minute |
|
s |
Seconde |
L’argument FirstDayOfWeek comporte les paramètres suivants :
Constante | Valeur | Description |
|---|---|---|
|
vbUseSystem |
0 |
Utilisez le paramètre de l’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 FirstWeekOfYear peut avoir les valeurs suivantes :
Constante | Valeur | Description |
|---|---|---|
|
vbUseSystem |
0 |
Utilisez le paramètre de l’API NLS. |
|
vbFirstJan1 |
1 |
Commencer par la semaine du 1er janvier (par défaut). |
|
vbFirstFourDays |
2 |
Commencer la première semaine ayant au moins quatre jours dans la nouvelle année. |
|
vbFirstFullWeek |
3 |
Commencer la première semaine complète de l’année. |
Remarques
Vous pouvez utiliser la fonction DatePart pour évaluer une date et retourner un intervalle de temps spécifique. Par exemple, vous pouvez utiliser DatePart pour calculer le jour de la semaine ou l’heure actuelle.
L’argument FirstDayOfWeek affecte les calculs qui utilisent les symboles de l’intervalle « w » et « WW ».
S' il s’agit d’une symbole littéral représentant une date, l’année spécifiée devient un élément permanent de cette date. Toutefois, si la Date est placée entre des guillemets doubles ("") et que vous omettez l’année, l’année en cours est insérée dans votre code chaque fois que l’expression de Date est évaluée. Ainsi, il est possible d’écrire du code qui peut être utilisé dans différentes années.
Remarque : Dans le cas d’une Date, si le paramètre de la propriété calendrier est grégorien, la date fournie doit être grégorienne. Si le calendrier est Hijri, la date fournie doit être Hijri.
La partie date renvoyée est comprise dans la période qui unit le calendrier arabe actuel. Par exemple, si le calendrier actuel est le calendrier islamique et que la partie de la date à retourner est l’année, la valeur de l’année est une année Hijri.
Exemples de requête
Expression | Résultats |
|---|---|
|
Sélectionnez PartDate ("aaaa", [DateofSale]) en tant que NewDate à partir de ProductSales ; |
Renvoie l’année de la valeur de date du champ « DateofSale ». |
|
Sélectionnez PartDate ("t", [DateofSale]) AS NewDate à partir de ProductSales ; |
Renvoie le « trimestre » (en fonction de l’année civile) des valeurs de date du champ « DateofSale ». |
|
Sélectionnez PartDate ("y", [DateofSale]) en tant que NewDate à partir de ProductSales ; |
Renvoie le « jour de l’année » (1 à 365) des valeurs de date du champ « DateofSale ». |
|
Sélectionnez PartDate ("j", [DateofSale]) AS NewDate à partir de ProductSales ; |
Renvoie le « jour » des valeurs de date du champ « DateofSale ». |
|
Sélectionnez PartDate ("m", [DateofSale]) en tant que NewDate à partir de ProductSales ; |
Renvoie le jour de la semaine (de 1 à 7, où 1 représente dimanche) des valeurs de date du champ « DateofSale ». |
|
Sélectionnez PartDate ("SS", [DateofSale]) en tant que NewDate à partir de ProductSales ; |
Renvoie le numéro de la semaine (1 à 52) des valeurs de date du champ « DateofSale ». |
|
Sélectionnez PartDate ("h", [DateHeure]) AS NewDate à partir de ProductSales ; |
Renvoie l’heure de la valeur du champ « dateheure ». |
|
Sélectionnez PartDate ("n", [DateHeure]) comme NewDate à partir de ProductSales ; |
Renvoie les « minutes » des valeurs de date du champ « dateheure ». |
|
Sélectionnez PartDate ("s", [DateHeure]) AS NewDate à partir de ProductSales ; |
Renvoie les « secondes » des valeurs de date du champ « dateheure ». |
Exemple VBA
Remarque : Les exemples suivants illustrent l’utilisation de cette fonction dans un module Visual Basic pour applications (VBA). Pour plus d’informations sur l’utilisation de VBA, sélectionnez Référence du développeur dans la liste déroulante en regard de Rechercher , puis entrez une ou plusieurs conditions dans la zone de recherche.
Cet exemple prend une date et, à l’aide de la fonction PartDate , affiche le trimestre de l’année pendant laquelle il s’est produit.
Dim TheDate As Date ' Declare variables.
Dim Msg
TheDate = InputBox("Enter a date:")
Msg = "Quarter: " & DatePart("q", TheDate)
MsgBox Msg
