How to check days?

D

dave

Hi
How can I check if today is Sunday or Saturday and put it
into If EndIf condition.
Thanx
dave
 
D

dlbjr

Sub Process(date1)
If IsDate(date1) Then
Select Case DatePart("w",date1)
Case 1 'Sunday
'Do Something
Case 2 'Monday
'Do Something
Case 3 'Tuesday
'Do Something
Case 4 'Wednesday
'Do Something
Case 5 'Thursday
'Do Something
Case 6 'Friday
'Do Something
Case 7 'Saturday
'Do Something
End Select
End If
End Sub

-dlbjr

Discerning resolutions for the alms
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Check forms With JavaScript 1
The following code is not working properly need assistance 2
Help with code plsss 0
Taskcproblem calendar 4
How to put a null check on this code 0
How to schedule events on specific days/times 1
HCaptcha - How to stop page from refreshing on submit if captcha is not checked/validated 1
Started a new job in web development and now considering resigning after 6 working days. 0

Members online

No members online now.
Total: 29 (members: 2, guests: 27)
Robots: 226

Forum statistics

Threads
473,766
Messages
2,569,569
Members
45,042
Latest member
icassiem

Latest Threads

Top