Public Function FirstBusinessDayOfMonth( _ ByVal vDate As Variant _ ) As Variant
FirstDayOfMonth(#9/15/1996#) = #9/1/1996# Format$(#9/1/1996#, "ddd") = "Sun" FirstBusinessDayOfMonth(#9/15/1996#) = #9/2/1996# Format$(#9/2/1996#, "ddd") = "Mon" FirstDayOfMonth(#4/10/1996#) = #4/1/1996# Format$(#4/1/1996#, "ddd") = "Mon" FirstBusinessDayOfMonth(#4/10/1996#) = #4/1/1996#See also:
FirstDayOfMonth Function LastBusinessDayOfMonth FunctionvDate: The date whose month and year components are examined to determine the first 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 next Monday.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.