Year Function

Syntax:
Year(dateexpr)
Group: Time/Date
Description:
Return the year.
Parameter Description

dateexpr Return the year for this date value. If this value is Null then Null is returned.
See Also: Date( ), Day( ), Month( ), Weekday( ).
Example:

Sub Main
Debug.Print Year(#1/1/1900#) ' 1900
End Sub