Funkcja VBA: DzieńTygodnia

Opis

Funkcja VBA Weekday zwraca numer dnia tygodnia (od 1 do 7) dla podanej daty.

Składnia Weekday

Weekday(data)

Lub

Weekday(data, pierwszy_dzień_tygodnia)

Numeracja

Domyślnie pierwszym dniem tygodnia jest niedziela (1), a ostatnim dniem jest sobota (7).

Aby zmienić numerację tak, aby poniedziałek był pierwszym dniem tygodnia (1), a niedziela ostatnim dniem tygodnia (7), przy korzystaniu z tej funkcji należy dodać wartość 2 jako drugi argument:

DzieńTygodnia(data, 2)

Przykład VBA Weekday

Używanie funkcji Weekday do wyświetlania numeru dnia tygodnia dla wielu dat:

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

Korzystanie z funkcji Weekday w celu rozróżnienia dnia powszedniego od weekendu:

Sub WeekdayExample2()

    If Weekday(Now, 2) < 6 Then
        MsgBox "Dzień powszedni..."
    Else
        MsgBox "To jest weekend!"
    End If
    
End Sub