WorksheetFunction.WeekNum (Excel)

Returns a number that indicates where the week falls numerically within a year.

WeekNum (Arg1, Arg2)

Dim dblWeekNum As Double
dblWeekNum = WorksheetFunction.WeekNum(Arg1:=)

Arguments

Arg1 - Serial_num - a date within the week. Dates should be entered by using the DATE function, or as results of other formulas or functions. For example, use DATE(2008,5,23) for the 23rd day of May, 2008. Problems can occur if dates are entered as text

Arg2 - Return_type - a number that determines on which day the week begins. The default is 1