» Calculate the count of workdays between two dates using VBA in Microsoft Excel
VBA macro tip contributed by Erlandsen Data Consulting offering Microsoft Excel Application development, template customization, support and training solutions
CATEGORY - Custom Functions , Printing in VBA
VERSION - All Microsoft Excel Versions
Function GetWorkDays(StartDate As Long, EndDate As Long) As Long
' returns the count of days between StartDate - EndDate minus Saturdays and Sundays
Dim d As Long, dCount As Long
For d = StartDate To EndDate
If WeekDay(d, vbMonday) < 6 Then
dCount = dCount + 1
End If
Next d
GetWorkDays = dCount
End Function
Copy and paste the code into a normal module sheet.
The function can be used like this in a worksheet cell:
=GETWORKDAYS(A2;B2)
Cell A2 and B2 have to contain valid Excel dates, or formulas/functions that return dates, e.g. =TODAY().
The function does not count the holidays between the two dates.
Book Store:
Recommended Books:
- Word 2002: The Complete Reference
- The Total Money Makeover. : A Proven Plan for Financial Fitness
- The 11 Immutable Laws of Internet Branding
- Analysis of Financial Statements
- The Intelligent Investor: The Definitive Book On Value Investing, Revised Edition
- Microsoft Windows XP Step by Step (With CD-ROM)
No comments have been submitted.

