LibreOffice 7.1:n ohje
Weekday palauttaa viikonpÀivÀn numeron pÀivÀmÀÀrÀn sarjanumerosta, joka on tuotettu funktiolla DateSerial tai DateValue.
WeekDay (luku1)
Integer-tyypin kokonaisluku
Luku1: numeerinen lauseke, jossa on pÀivÀmÀÀrÀsarjanumero, jota kÀytetÀÀn viikon pÀivÀn laskemiseen (1-7).
Seuraavassa esimerkissÀ kÀytetÀÀn WeekDay-funktiota viikonpÀivÀn mÀÀrittÀmiseen annetusta pÀivÀmÀÀrÀstÀ.
Sub ExampleWeekDay
Dim sDay As String
' palautetaan ja esitetÀÀn viikonpÀivÀ
Select Case WeekDay( Now )
Case 1
sDay="sunnuntai"
Case 2
sDay="maanantai"
Case 3
sDay="tiistai"
Case 4
sDay="keskiviikko"
Case 5
sDay="torstai"
Case 6
sDay="perjantai"
Case 7
sDay="lauantai"
End Select
msgbox "" + sDay,64,"TÀnÀÀn on"
End Sub