Find what month week starts in

[david_ste]

currentDate = date()
wkNo = datepart("w", currentDate)

Gets my week no as in 48 but how can i find what month that week starts in.

[mattglet]

I think this should do it (not tested):

currentDayOfWeek = WeekDay(currentDate)

If Not currentDayOfWeek = 1 Then
'--- Get Sunday's Date
tempDate = DateAdd("d", -1 * (currentDayOfWeek - 1), currentDate))
End If

'--- Get what month Sunday's Date is in
theMonth = Month(tempDate)

[mrMister]

currentDate = date()
wkNo = datepart("w", currentDate)
mthNo = month(currentDate)

[mattglet]

I think he wanted the month in which the "week starts in", not the month of the date.