Helpo de LibreOffice 24.8
Liveras la jaron el data numero generita de la funkcio DateSerial aŭ DateValue.
Year (Number)
Entjero
Number: Entjera esprimo kiu donas la datan numeron por kalkuli la jaron.
Ĉi tiu funkcio estas la kontraŭo de la funkcio DateSerial, kaj liveras la jaron de data numero. Ekzemple, la esprimo:
Print Year(DateSerial(1994, 12, 20))
liveras la valoron 1994.
Sub ExampleYear
MsgBox "" & Year(Now) ,64,"Nuna jaro"
End Sub