LibreOffice 7.1 Bantuan
Mengembalikan bilangan yang sesuai dengan hari kerja yang diwakili oleh nomor seri tanggal yang dihasilkan oleh fungsi DateSerial atau DateValue.
WeekDay (Angka)
Integer
Nomor: Ekspresi bilangan bulat yang berisi nomor tanggal seri yang digunakan untuk menghitung hari dalam seminggu (1-7).
Contoh berikut menentukan hari dalam seminggu menggunakan fungsi WeekDay ketika Anda memasukkan tanggal.
Sub ExampleWeekDay
Dim sDay As String
' Kembalikan Dan tampilkan hari dalam seminggu
Select Case WeekDay( Now )
Case 1
sDay="Minggu"
Case 2
sDay="Senin"
Case 3
sDay="Selasa"
Case 4
sDay="Rabu"
Case 5
sDay="Kamis"
Case 6
sDay="Jumat"
Case 7
sDay="Sabtu"
End Select
msgbox "" + sDay,64,"Hari ini adalah"
End Sub