Public Function get_Weekdays(pstart As Date, pend As Date) As Integer
ret=0
' return value, holds weekdays between pstart and pend
ret =7 - Weekday(pstart)
' notes about what this line is doing (defines start as Monday-Sunday)
ret = ret + 5 * (DateDiff("ww", pstart, pend) - 1)...