Kang Muntahar, Silahkan dicoba file attachmentnya. hasil di Immediate Window sbb:
?FormatDateTime(Date,vbLongDate)
Wednesday, October 15, 2008
?fGetDateAfterXWorkDays(Date(),35)
03-Dec-2008
?Date
15/10/2008
35 Hari setelah hari ini,
?fGetDateAfterXWorkDays(Date(),35)
03-Dec-2008
Jumlah Hari Kerja di tahun 2008
?fGetWorkDays("1 January 2008","31 December 2008")
243
Jumlah Hari kerja bulan januari 2008
?fGetWorkDays(#1-jan-2008#,#31-jan-2008#)
21
Jumlah hari Kerja bulan Februari 2008
?fGetWorkDays(#1-feb-2008#,#29-feb-2008#)
19
Mdh-mudahan bermanfaat.
Salam Hangat dan Jabat Erat,
Edy WIYONO
WorkDays.rar
Description: Binary data
