Fonction VBA : DatePart
La fonction VBA DatePart renvoie un nombre entier correspondant à une donnée d'une date (jour, mois, année, heure, minutes, secondes, jour de la semaine et numéro de semaine).
Utilisation :
DatePart(type_de_donnée, date)
Exemple d'utilisation
Utilisation de la fonction DatePart pour obtenir différentes données d'une date :
Sub exemple()
maDate = #10/25/2024 3:35:45 PM#
'Jour (1 à 31)
MsgBox DatePart("d", maDate) 'Renvoie : 25
'Jour de l'année (1 à 366)
MsgBox DatePart("y", maDate) 'Renvoie : 299
'Heure
MsgBox DatePart("h", maDate) 'Renvoie : 15
'Minutes
MsgBox DatePart("n", maDate) 'Renvoie : 35
'Secondes
MsgBox DatePart("s", maDate) 'Renvoie : 45
'Mois
MsgBox DatePart("m", maDate) 'Renvoie : 10
'Année
MsgBox DatePart("yyyy", maDate) 'Renvoie : 2024
'Jour de la semaine (1 à 7)
' => le 3e argument à 2 précise que la semaine commence un lundi
MsgBox DatePart("w", maDate, 2) 'Renvoie : 5
'Semaine de l'année (1 à 53)
' => le 4e argument à 2 permet d'obtenir un numéro de semaine ISO
MsgBox DatePart("ww", maDate, , 2) 'Renvoie : 43
End Sub