Fonction Year

Renvoie l'année à partir d'un numéro de date sériel généré par la fonction DateSerial ou DateValue.

Syntaxe :

Year (Number)

Valeur de retour :

Nombre entier

Paramètres :

Number : expression au format nombre entier contenant le numéro de date sériel utilisé pour calculer l'année.

Cette fonction est l'inverse de la fonction DateSerial et renvoie l'année d'une date sérielle. Par exemple, l'expression suivante :

Print Year(DateSerial(1994, 12, 20))

renvoie la valeur 1994.

Exemple :

Sub ExampleYear
    MsgBox "" & Year(Now) ,64,"Année en cours"
End Sub