Fonction VBA : Weekday

Description

La fonction VBA Weekday renvoie le numéro du jour de la semaine (de 1 à 7) pour la date donnée.

Syntaxe Weekday

Weekday(date)

Ou

Weekday(date, premier_jour_de_semaine)

Numérotage

Par défaut, le premier jour de la semaine est le dimanche (1) et le dernier jour est le samedi (7).

Pour modifier la numérotation afin que lundi soit le premier jour de la semaine (1) et dimanche le dernier jour de la semaine (7), ajoutez la valeur 2 comme deuxième argument lorsque vous utilisez cette fonction :

Weekday(date, 2)

Exemple VBA Weekday

Utilisation de la fonction Weekday pour afficher le numéro du jour de la semaine pour plusieurs dates :

Sub WeekdayExample1()
    
    MsgBox Weekday(#11/2/2020#, 2)          'Retours: 1
    MsgBox Weekday("3.11.20", 2)            'Retours: 2
    MsgBox Weekday("4 nov 2020", 2)         'Retours: 3
    MsgBox Weekday("11/05/2020 17:30:21", 2) 'Retours: 4
    
End Sub

Utilisation de la fonction Weekday pour distinguer un jour de semaine d'un week-end :

Sub WeekdayExample2()

    If Weekday(Now, 2) < 6 Then
        MsgBox "Jour de la semaine..."
    Else
        MsgBox "C'est le weekend!"
    End If
    
End Sub