LibreOffice 7.1 Yardım
DateSerial veya DateValue fonksiyonu tarafından oluşturulan seri tarih numarasının belirlediği güne karşılık gelen sayıyı döndürür.
WeekDay (Sayı)
Tamsayı
Sayı: Haftanın hangi günü (1-7) olduğu hesaplatacak tam sayı değeri.
Aşağıdaki örnek girdiğiniz tarih için WeekDay fonksiyonunu kullanarak haftanın gününü hesaplar.
Sub ExampleWeekDay
Dim sDay As String
REM Haftanın gününü döndür ve görüntüle
Select Case WeekDay( Now )
Case 1
sDay="Pazar"
Case 2
sDay="Pazartesi"
Case 3
sDay="Salı"
Case 4
sDay="Çarşamba"
Case 5
sDay="Perşembe"
Case 6
sDay="Cuma"
Case 7
sDay="Cumartesi"
End Select
msgbox "" + sDay,64,"Bugün"
End Sub