I would like to calculate the days between two dates and exclude the weekend days within a report. In the report I have datReviewStart and datFWComplete. I have another unbound txt box called txtDays. Using the datediff function, =datediff("d", [datReviewStart], [datFWComplete]) includes weekend days.

So, if my beginning date was 2/12/08 and the end date was 2/20/08, the result would be 8 days. I need the result to read 6 days (excluding Saturday and Sunday.) Any suggestions?

This is the rough way to make this calculation:

Dim dtDate As Date
Dim iWeekDays As Integer

dtDate = #01/01/2008#

iWeekDays = DateDiff("d", dtDate, Now()) * 5 / 7

Result: 44 as of March 3, 2008.

The real answer should be 45, but the end of the day today has not passed, so the answer is 44, the number of workdays that have actually passed since 1/1/2008.

If this is sufficient, then use this. Otherwise you can either loop through the dates and throw out 1's and 7's, or you can add one to add today's weekday IF it does not equal 1 or 7.

Did that help?


mmcdonal

Look it up at: http://wrox.books24x7.com