FirstDateOfDayInYear

Syntax:

FirstDateOfDayInYear(dateexpr,NumZ{day})

Description:

Returns the date of the first instance of the specified day in the year of the date specified.  For example, this function could return the date of the first Monday of next year.

Parameters:

Parameter

Description

dateexpr

The date to be used when determining the first instance of the day.

 

NumZ{day}

Value

Description

vbSunday

1

Sunday

vbMonday

2  

Monday

vbTuesday

3

Tuesday

vbWednesday

4

Wednesday

vbThursday

5

Thursday

vbFriday

6

Friday

vbSaturday

7

Saturday

 

Example:


Sub Main
'return the date of the first Sunday of this year.
  firstSundayofthisyear = FirstDateOfDayInYear(Now(),1)

'return the date of the first Monday of next year.
  firstMondayofnextyear = FirstDateOfDayInQuarter(DateAdd(1, "yyyy" ,Now()),2)

EndSub


See Also:

IsLeapYear, FirstDateOfDayInQuarter, LastDateOfDayInMonth, LastDateOfDayInQuarter, LastDateOfWeek, LastDayOfMonth, LastDayOfQuarter, LastDayOfYear