» 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:
- Preparing the Marketing Plan (Ama Marketing Toolbox Series New Edition)
- Marketing Plans That Work, Targeting Growth and Profitability
- Analyzing Markets, Products, and Marketing Plans
- Monte Carlo Methods in Finance
- Advanced modelling in finance using Excel and VBA
- Financial Risk Manager Handbook, Second Edition
No comments have been submitted.

