Função Year

Retorna um número inteiro que representa o ano.

Sintaxe

Year(date)

Argumentos

Date: Obrigatório. Qualquer expressão que possa representar uma data.

Formatos de Data Suportados:

• MM-DD-YYYY
• MM/DD/YYYY
• DD-MM-YYYY
• DD/MM/YYYY
• YYYY-MM-DD
• YYYY/MM/DD

Comentários

O exemplo a seguir usa a função Year para obter o ano de uma data especificada:

Exemplo 1:

Dim MyDate1, MyYear1
MyDate1 = "21-01-2025"
MyYear1 = Year(MyDate1)  
'Output: 2025

Exemplo 2:

Dim MyYear2
MyYear2 = Year(Date)   
'Output: If current date is 22 January 2025, then it returns 2025

Exemplo 3:

Dim MyDate3, MyYear3
MyDate3 = DateAdd("yyyy", 5, "21/01/2020")   
MyYear3 = Year(MyDate3)                      
'Output: 2025