Como usar a função DateValue em VBA?

A função `DateValue` em VBA é utilizada para converter uma string que representa uma data em um valor de data. Esta função é útil quando você tem datas em formato de texto e precisa manipulá-las como datas reais em VBA.

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

Sub ExemploDateValue()
    Dim strData As String
    Dim dataConvertida As Date
    
    ' Atribuir uma data em formato de string
    strData = "12/10/2023"
    
    ' Converter a string em um valor de data
    dataConvertida = DateValue(strData)
    
    ' Exibir o resultado em uma caixa de mensagem
    MsgBox "A data convertida é: " & dataConvertida
End Sub

Detalhes Importantes:

Formato da Data: A string de data pode estar em diferentes formatos, como “DD/MM/YYYY” ou “MM/DD/YYYY”, dependendo das configurações regionais do sistema. É importante garantir que o formato da string esteja de acordo com as configurações do sistema para evitar erros de conversão.
Erros de Conversão: Se a string não puder ser convertida em uma data válida, o VBA gerará um erro de execução. Para evitar que seu código quebre, você pode usar tratamento de erros com `On Error` ou verificar manualmente se a string representa uma data válida antes da conversão.
Ano Padrão: Se a string de data contiver apenas “M/D” ou “D-M”, o `DateValue` assumirá o ano atual.
Compatibilidade com VarDate: A função `DateValue` é muitas vezes usada em conjunto com variáveis do tipo `Date` para assegurar que os valores podem ser comparados ou manipulados como datas.

Sempre que precisar manipular datas a partir de strings, `DateValue` é uma ferramenta confiável para garantir que você possa trabalhar com valores de data reais em VBA.

facebooklinkedin