Public Function PreviousDayOfWeek( _ ByVal vDate As Variant _ , ByVal vDayOfWeek As Variant _ ) As Variant
Format$(#4/15/1996#, "ddd") = "Mon" PreviousDayOfWeek(#4/15/1996#, vbSunday) = #4/14/1996# PreviousDayOfWeek(#4/15/1996#, vbFriday) = #4/12/1996# PreviousDayOfWeek(#4/15/1996#, vbTuesday) = #4/09/1996# PreviousDayOfWeek(#4/15/1996#, vbMonday) = #4/08/1996# PreviousDayOfWeek(#4/15/1996#, #4/15/1996#) = #4/08/1996#See also:
PreviousDayOfWeekOnOrBefore Function NextDayOfWeek Function vbSunday Property, et. al.vDate: The date whose previous specific day of the week is returned. Function returns Null if vDate is Null or cannot be fixed up to a Date.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.