Public Function NextWeekday( _ ByVal vDate As Variant _ ) As Variant
Weekday(#1/3/96#) = vbWednesday Weekday(#1/8/96#) = vbMonday NextWeekday(#1/3/96#) = #1/4/96# NextWeekday(#1/4/96#) = #1/5/96# NextWeekday(#1/5/96#) = #1/8/96# NextWeekday(#1/6/96#) = #1/8/96# NextWeekday(#1/7/96#) = #1/8/96# NextWeekday(#1/8/96#) = #1/9/96#See also:
PreviousWeekday Function FirstWeekdayOfMonth Function LastWeekdayOfMonth Function NextDayOfWeek Function NextDayOfWeekOnOrAfter FunctionvDate: The date whose following weekday (Monday through Friday) is returned. Function returns Null if vDate is Null or cannot be interpreted as a Date.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.