Funzione Year

Restituisce l'anno da un numero seriale generato dalla funzione DateSerial o DateValue.

Sintassi:


Year (Numero)

Valore restituito:

Integer

Parametri:

Numero: espressione numerica intera contenente il numero seriale usato per calcolare l'anno.

Questa funzione è l'opposto di DateSerial e restituisce l'anno di una data seriale. Ad esempio, l'espressione:


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

restituisce il valore 1994.

Codici di errore:

5 Richiamo di procedura non valido

Esempio:


Sub ExampleYear
    MsgBox "" & Year(Now) ,64,"Anno in corso"
End Sub

Sosteneteci!