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