Функція VBA Year повертає ціле число, що відповідає року вказаної дати.
Year(дата)
Використання функції Year для отримання відповідної інформації з дати:
Sub YearExample1()
myDate = #10/30/2020#
MsgBox Year(myDate) 'Повертає: 2020
End Sub
Ця функція також приймає дату в текстовому форматі:
Sub YearExample2()
myDate = "30/10/2020"
MsgBox Year(myDate) 'Повертає: 2020
End Sub