La fonction VBA Year renvoie un entier correspondant à l'année de la date spécifiée.
Année(date)
Utilisation de la fonction Year pour récupérer les informations pertinentes d'une date :
Sub YearExample1() myDate = #10/30/2020# MsgBox Year(myDate) 'Retours: 2020 End Sub
Cette fonction accepte également une date au format texte :
Sub YearExample2() myDate = "30/10/2020" MsgBox Year(myDate) 'Retours: 2020 End Sub