Counting Work Days

Counting Work Days

I need to calculate the number of workingdays. Is there an easy way to do this?

From what I can see, there is no built-in function to do this. However, you can very easily write the code to do this. By using the DateDiff, DateAdd, and Weekday functions, you can determine how many days there are between two dates and how many of them are weekdays. The code here shows you how to do it.

Dim i As IntegerDim iDay As IntegerDim iDayCount As IntegerFor i = 0 To DateDiff(“d”, “12-1-97”, “12-15-97”) – 1   iDay = WeekDay(DateAdd(“d”, i, “12-1-97”))   If iDay <> vbSunday And iDay <> vbSaturday Then      iDayCount = iDayCount + 1   End IfNext i

See also  Does It Make Sense to Splurge on a Laptop?

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist