Public Function LastBusinessDayOfMonth( _ ByVal vDate As Variant _ ) As Variant
LastDayOfMonth(#3/15/1996#) = #3/31/1996# Format$(#3/31/1996#, "ddd") = "Sun" LastBusinessDayOfMonth(#3/15/1996#) = #3/29/1996# Format$(#3/29/1996#, "ddd") = "Fri" LastBusinessDayOfMonth(#4/10/1996#) = #4/30/1996# Format$(#4/30/1996#, "ddd") = "Tue" LastDayOfMonth(#4/10/1996#) = #4/30/1996#See also:
LastDayOfMonth Function FirstBusinessDayOfMonth FunctionvDate: The date whose month and year components are examined to determine the last business day of the month. Function returns Null if vDate is Null or cannot be fixed up to a Date. Function assumes that the business days are Monday through Friday. When the date falls on a weekend, the function returns the date of the previous Friday.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.