Συνάρτηση Year
Επιστρέφει το έτος από έναν σειριακό αριθμό ημερομηνίας που παράγεται από την συνάρτηση DateSerial ή την συνάρτηση DateValue.
Σύνταξη:
Year (Number)
Τιμή επιστροφής:
Ακέραιος
Παράμετροι:
Number: Ακέραια παράσταση που περιέχει τον σειριακό αριθμό ημερομηνίας από τον οποίο θα υπολογιστεί το έτος.
Αυτή η συνάρτηση είναι βασικά η αντίστροφη της συνάρτησης DateSerial και επιστρέφει το έτος μιας σειριακής ημερομηνίας. Παραδείγματος χάριν, η έκφραση:
Print Year(DateSerial(1994, 12, 20))
επιστρέφει την τιμή 1994.
Παράδειγμα:
Sub ExampleYear
MsgBox "" & Year(Now) ,64,"Τρέχον έτος"
End Sub