Login | Register   
LinkedIn
Google+
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: Visual Basic
Expertise: Beginner
Dec 23, 1997

Counting Work Days

Question:
I need to calculate the number of working days. Is there an easy way to do this?

Answer:
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 Integer
Dim iDay As Integer
Dim iDayCount As Integer
For 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 If
Next i
DevX Pro
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap
Thanks for your registration, follow us on our social networks to keep up-to-date