Funcția VBA Year returnează un număr întreg corespunzător anului datei specificate.
Year(data)
Folosind funcția Year pentru a prelua informații relevante de la o dată:
Sub YearExample1() myDate = #10/30/2020# MsgBox Year(myDate) 'Retur: 2020 End Sub
Această funcție acceptă și o dată în format text:
Sub YearExample2() myDate = "30.10.2020" MsgBox Year(myDate) 'Retur: 2020 End Sub