Como usar a função Ano no VBA?

A função `Year` no VBA (Visual Basic for Applications) é usada para extrair o ano de uma data. Essa função retorna um valor inteiro representando o ano de uma data especificada. A sintaxe para a função `Year` é bastante simples:

Year(date)

`date`: Uma expressão que pode representar uma data. Geralmente, isso é um valor do tipo `Date`, mas pode ser também qualquer expressão que o VBA reconheça como uma data válida.

Aqui está um exemplo de como utilizar a função `Year` no VBA:

Sub ExemploAno()
    Dim dataExemplo As Date
    Dim anoExemplo As Integer

    ' Atribui uma data específica
    dataExemplo = #10/24/2023#

    ' Extrai o ano usando a função Year
    anoExemplo = Year(dataExemplo)

    ' Imprime o ano na Janela de Imediato (Ctrl + G para abrir)
    Debug.Print "O ano é " & anoExemplo
End Sub

Neste exemplo, a variável `dataExemplo` contém uma data específica (24 de outubro de 2023). A função `Year` é usada para obter o ano dessa data e o resultado é armazenado na variável `anoExemplo`, que, então, é exibido na janela de imediato do VBA.

Lembre-se de que, se você passar um valor que não é reconhecido como uma data pela função `Year`, você pode encontrar um erro, então é sempre uma boa prática garantir que o valor fornecido seja um `Date` válido.

facebooklinkedin