Helpo de LibreOffice 7.1
Liveras la nombron kiu korespondas al la tago de la semajno reprezentita de la data numero generita de la funkcio DateSerial aŭ DateValue.
WeekDay (Number)
Entjero
Number: Entjera esprimo kiu enhavas la datan numeron uzota por kalkuli la tagon de la semajno (1-7).
La jena ekzemplo kalkulas la tagon de la semajno per la funkcio WeekDay kiam oni enigas daton.
Sub ExampleWeekDay
Dim sDay As String
REM Liveri kaj vidigi la tagon de la semajno
Select Case WeekDay( Now )
Case 1
sDay="dimanĉo"
Case 2
sDay="lundo"
Case 3
sDay="mardo"
Case 4
sDay="merkredo"
Case 5
sDay="ĵaŭdo"
Case 6
sDay="vendredo"
Case 7
sDay="sabato"
End Select
msgbox "" + sDay,64,"Hodiaŭ estas"
End Sub