Public Function LastDayOfWeekInMonth( _
ByVal vYear As Variant _
, ByVal vMonth As Variant _
, ByVal vDayOfWeek As Variant _
) As Variant Weekday(#1/31/96#) = vbWednesday
LastDayOfWeekInMonth(1996, 1, vbWednesday) = #1/31/96#
LastDayOfWeekInMonth(1996, 1, vbMonday) = #1/29/96#
LastDayOfWeekInMonth(1996, 1, vbThursday) = #1/25/96#See also: FirstDayOfWeekInMonth Function
NthDayOfWeekInMonth Function
LastDayOfMonth Function
LastWeekdayOfMonth Function
LastDayOfPeriod FunctionvYear: Must use the full four-digit year; cannot use 96, for example, to mean 1996. Function returns Null if vYear is Null or cannot be interpreted as an integer number. Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.