如何排除“开始日”和“完成日”之间的星期日，并将符合条件的用底纹进行区别。作者: tmtony 时间: 2008-5-5 10:20
这个需要单独做一个自定义函数，来取得当前日期范围内的星期天数，然后扣除之，得出实际天数
可查询一下有关查询星期天方面的算法和函数作者: kent_73 时间: 2008-5-5 10:55
那么怎么做呢？还请做个示例。作者: tmtony 时间: 2008-5-6 00:41
'除掉星期天之后有几个工作日
'tmtony http://bbs.office-cn.net
'传递开始日期和结束日期进去就可以了
Public Function GetWorkDays(datStart As Date, rdatEnd As Date) As Long
Dim n As Long
n = DateDiff("WW", datStart, rdatEnd)
If Weekday(datStart, vbMonday) = 7 Then n = n + 1
GetWorkDays = n
End Function