Tutorial WeekDays dengan Mudah di Excel

Panduan WeekDays dengan Mudah di Excel

Selamat datang kembali di LingkaranDunia, Dibawah ini akan diajari tentang cara mendapatkan perhitungan weekdays diantara 2 hari di excel VBA. Dan yang termasuk weekdays adalah : Senin, Selasa, Rabu, Kamis dan Jumat.

Situasinya :

Dan untuk format tanggalnya adalah disesuaikan dengan format US.

1. Pertama, akan dilakukan deklarasi variable.

Dim date1 As Date, date2 As Date, dateToCheck As Date

Dim daysBetween As Integer, weekdays As Integer, i As Integer

2. Akan ada 4 variabel. Kita akan menggunakan fungsi Datediff untuk menginisilisasi variable diantara hari. Fungsi ini mempunyai 3 agrument. Dan untuk argument – agrumentnya dapat dilihat disini.

weekdays = 0
date1 = Range(“B2”)
date2 = Range(“B3”)
daysBetween = DateDiff(“d”, date1, date2)

3. Harus dilakukan pengecekan pada setiap tanggal diantara tanggal diantara date 1 dan date 2 ( termasuk didalamnya date 1 dan date 2 ) dan akan disediakan coding untuk dapat dimasukkan ke loop berikutnya.

For I = 0 To daysBetween

4. Menggunakan Fungsi DateAdd untuk mendapatkan setiap tanggal yang akan kita gunakan. Fungsi ini mempunyai 3 agrument, dan argument pertama yang akan di berikan adalah “d” karena kita akan menambah harinya, dan huruf “I” untuk argument ke duanya, dan date 1 untuk agruments ke 3 nya karena kita akan menambah I days menjadi date 1. Di Excel VBA  ini, dapat melakukan checking setiap tanggalnya diantara date 1 dan date 2 dan selalu dimulai dengan date 1. Tambahkan barisan coding yang ada di bawah ini :

Datetocheck = dateadd (“d”, I, date1)

Contoh : for I = 3, excel vba check date1 + 3 hari.

5. Kemudian, akan digunakan fungsi weekday untuk mengecek apakah datetocheck adalah sebuah weekday atau pun bukan. Fungsi weekdays membalikan 1 untuk minggu dan 7 untuk sabtu. Dan barisan kode yang akan membuat ini selesai.

If (Weekday(dateToCheck) <> 1 And Weekday(dateToCheck) <> 7) Then

weekdays = weekdays + 1

End If

6. Jangan lupa untuk menutup loopnya

Next i

7. Kemudian coding untuk Msgboxnya

MsgBox weekdays & ” weekdays between these two dates”

8. Hasilnya

Begitula tutorail singkat tentang excel macro kita ini. Semoga bisa membantu pekerjaan kantoran kita.

Penutup

Terima kasih atas kunjungan anda di LingkaranDunia, serta membaca artikel yang mengenai Tutorial WeekDays dengan Mudah di Excel, dan semoga artikel ini bermanfaat buat anda. Jika ada yang kurang di mengerti silahkan ajukan pertanyaan lewat Email, Facabook LingkaranDunia dan lewat kolom komentar yang kami sediakan di bawah artikel ini.

Daftar Pustaka

• http://amirakostader.blogspot.co.id/
• http://rumuslengkap.com/excel-macro/belajar-weekdays-dengan-mudah/
• http://blogpanduanmicrosoft.blogspot.co.id/