Public Function IsWeekday( _ ByVal vDayOfWeek As Variant _ ) As Variant
Format$(#3/1/1996#, "ddd") = "Fri" IsWeekday(#3/1/1996#) = True IsWeekday(#3/2/1996#) = False IsWeekday(#3/3/1996#) = False IsWeekday(#3/4/1996#) = TrueSee also:
IsWeekendDay Function vbSunday Property, et. al.Alternate:
IsWeekday(X) = Not IsWeekendDay(X)vDayOfWeek: The date or numeric value which is checked to see if it is a weekday, Function returns Null if vDayOfWeek is Null or cannot be fixed up to either a date or a number. Function first checks numeric values to see if they are one of the vb constants that represent the days of the week (vbSunday, vbMonday, vbTuesday, vbWednesday, vbThursday, vbFriday, or vbSaturday). Otherwise, numeric values are interpreted as date values. Function examines the date component of date/time values to see if the date falls on a weekday.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.