Validate date in Excel as weekday

T

TCUser

I am trying to find a way to validate a date entered in Excel as a weekday.
It would be helpful to warn the user if they try to enter a Saturday or
Sunday date and possible holidays.
 
D

dmoney

Dim mydate As String
mydate = Format(Date + 2, "dddd")
If mydate = "Saturday" Then msgbox="Saturday Entered"
If mydate = "Sunday" Then msgbox = "Sunday Entered"
 
G

Gary Keramidas

you don't really give an example of what you're doing, but here is one way,
with the date entered in A1

If Weekday(Range("A1").Value, vbMonday) > 5 Then
MsgBox "weekend"
End If
 
Top