Public Function IsWeekendDay( _ ByVal vDayOfWeek As Variant _ ) As Variant
Format$(#3/1/1996#, "ddd") = "Fri" IsWeekday(#3/1/1996#) = False IsWeekday(#3/2/1996#) = True IsWeekday(#3/3/1996#) = True IsWeekday(#3/4/1996#) = FalseSee also:
IsWeekday Function vbSunday Property, et. al.Alternate:
IsWeekendDay(X) = Not IsWeekday(X)vDayOfWeek: The date or numeric value which is checked to see if it is a weekend day, 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 weekend.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.