DATEPART |
Partie de la date |
|---|---|
| Visual Basic | |
Syntaxe
| Function DatePart(interval,date[,firstdayofweek[,firstweekofyear]]) ) |
Paramètres
| Nom | Description | ||
|---|---|---|---|
| interval | Ce paramètre permet d'indiquer le type d'intervalle de temps à retourner : | ||
| Valeur | Description | ||
| "yyyy" | Cette valeur permet d'indiquer une année | ||
| "q" | Cette valeur permet d'indiquer un trimestre | ||
| "m" | Cette valeur permet d'indiquer un mois | ||
| "y" | Cette valeur permet d'indiquer des jours dans l'année | ||
| "d" | Cette valeur permet d'indiquer un jour | ||
| "w" | Cette valeur permet d'indiquer un jour de semaine | ||
| "ww" | Cette valeur permet d'indiquer une semaine de l'année | ||
| "h" | Cette valeur permet d'indiquer l'heure | ||
| "n" | Cette valeur permet d'indiquer les minutes | ||
| "s" | Cette valeur permet d'indiquer les secondes | ||
| date | Ce paramètre permet d'indiquer la date sur laquelle il faut effectuer le calcul | ||
| firstdayofweek | Ce paramètre optionnel permet d'indiquer le premier jour de la semaine. Les valeurs possibles sont : | ||
| Valeur | Constante | Description | |
| 0 | vbUseSystemDayOfWeek | Cette valeur permet d'indiquer qu'il faut utiliser le NLS (National Language Support) | |
| 1 | vbSunday | Cette valeur permet d'indiquer qu'il faut utiliser le Dimanche. C'est la valeur par défaut. | |
| 2 | vbMonday | Cette valeur permet d'indiquer qu'il faut utiliser le Lundi. | |
| 3 | vbTuesday | Cette valeur permet d'indiquer qu'il faut utiliser le Mardi. | |
| 4 | vbWednesday | Cette valeur permet d'indiquer qu'il faut utiliser le Mercredi. | |
| 5 | vbThursday | Cette valeur permet d'indiquer qu'il faut utiliser le Jeudi. | |
| 6 | vbFriday | Cette valeur permet d'indiquer qu'il faut utiliser le Vendredi. | |
| 7 | vbSaturday | Cette valeur permet d'indiquer qu'il faut utiliser le Samedi. | |
| firstweekofyear | Ce paramètre optionnel permet d'indiquer le premier jour de l'année. Les valeurs possibles sont : | ||
| Valeur | Constante | Description | |
| 0 | vbUseSystem | Cette valeur permet d'indiquer qu'il faut utiliser le NLS (National Language Support) | |
| 1 | vbFirstJan1 | Cette valeur permet d'indiquer qu'il faut commencer avec la semaine du premier 1 janvier. C'est la valeur par défaut. | |
| 2 | vbFirstFourDays | Cette valeur permet d'indiquer qu'il faut commencer dans les 4 derniers jours de la semaine de la nouvelle année. | |
| 3 | vbFirstFullWeek | Cette valeur permet d'indiquer qu'il faut commencer dans la premier semaine complète de la nouvelle année. | |
Description
Cette fonction permet de demander la valeur numérique d'une partie de la date spécifié.
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. Le paramètre firstweekofyear affecte les calculs utilisant les symboles d'intervalle «w» et «ww».
- Si date est un littéral de date, l'année spécifiée devient une partie permanente de cette date. Toutefois, si la date est placée entre guillemets ("") 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. Cette situation permet d'écrire du code pouvant être utilisé dans différentes années.
- Cet exemple prend une date et, à l'aide de la fonction DatePart, affiche le trimestre de l'année au cours duquel elle se produit :
Function GetQuarter(TheDate)
GetQuarter = DatePart("q", TheDate)
End Function
Exemple
Voici un exemple d'une utilisation typique de cette fonction :
- Sub Main()
- MsgBox "d=" & DatePart("d","2010-01-09") & vbCrLf & _
- "h=" & DatePart("h","2010-01-09 05:30:00") & vbCrLf & _
- "m=" & DatePart("m","2010-01-09") & vbCrLf & _
- "n=" & DatePart("n","2010-01-09 05:30:00") & vbCrLf & _
- "q=" & DatePart("q","2010-01-09") & vbCrLf & _
- "s=" & DatePart("s","2010-01-09 05:30:00") & vbCrLf & _
- "w=" & DatePart("w","2010-01-09") & vbCrLf & _
- "ww=" & DatePart("ww","2010-01-09") & vbCrLf & _
- "y=" & DatePart("y","2010-01-09") & vbCrLf & _
- "yyyy=" & DatePart("yyyy","2010-01-09")
- End Sub
on obtiendra le résultat suivant :
d=9h=5
m=1
n=30
q=1
s=0
w=7
ww=2
y=9
yyyy=2010
Dernière mise à jour : Lundi, le 19 novembre 2012