LibreOffice 7.1 Súgó
Visszaadja a DateSerial vagy DateValue függvény által meghatározott soros dátumértéknek megfelelő hétköznap számát.
WeekDay (Szám)
Integer (egész szám)
Szám: Integer (egész szám) kifejezés, amely a hét egy napjának(1-7) kiszámítására használt soros dátumértéket tartalmazza.
Az alábbi példa meghatározza egy dátum megadásánál a hétköznapot a WeekDay függvény segítségével.
Sub ExampleWeekDay
Dim sDay As String
' Visszaadja és megjeleníti a hétköznapot
Select Case WeekDay( Now )
Case 1
sDay="Vasárnap"
Case 2
sDay="Hétfő"
Case 3
sDay="Kedd"
Case 4
sDay="Szerda"
Case 5
sDay="Csütörtök"
Case 6
sDay="Péntek"
Case 7
sDay="Szombat"
End Select
MsgBox "" + sDay,64,"A mai nap"
End Sub