Public Function PreviousWeekday( _ ByVal vDate As Variant _ ) As Variant
Weekday(#1/9/96#) = vbTuesday Weekday(#1/5/96#) = vbFriday NextWeekday(#1/9/96#) = #1/8/96# NextWeekday(#1/8/96#) = #1/5/96# NextWeekday(#1/7/96#) = #1/5/96# NextWeekday(#1/6/96#) = #1/5/96# NextWeekday(#1/5/96#) = #1/4/96# NextWeekday(#1/4/96#) = #1/3/96#See also:
NextWeekday Function LastWeekdayOfMonth Function FirstWeekdayOfMonth Function PreviousDayOfWeek Function PreviousDayOfWeekOnOrBefore FunctionvDate: The date whose previous 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.