Como usar a função TimeValue em VBA?

A função `TimeValue` em VBA (Visual Basic for Applications) é usada para converter uma string que representa uma hora em um valor de data e hora do tipo `Date`, mas que refere-se apenas à hora. Isso pode ser útil quando você precisa manipular ou calcular horas a partir de strings textuais.

Aqui está um exemplo básico de como usar a função `TimeValue` em VBA:

Sub ExemploTimeValue()
    Dim horaStr As String
    Dim horaData As Date
    
    ' Atribui uma string representando uma hora
    horaStr = "14:30:00"
    
    ' Usa a função TimeValue para converter a string em um valor de data de hora
    horaData = TimeValue(horaStr)
    
    ' Exibe o resultado no formato de hora
    MsgBox "A hora é: " & Format(horaData, "hh:mm:ss")
End Sub

Explicação:

Declaração das Variáveis:

`horaStr` é uma variável do tipo `String` que armazena a representação textual da hora.
`horaData` é uma variável do tipo `Date` que irá armazenar o resultado da função `TimeValue`.

Atribuição de Valor:

`horaStr` é definida com uma string de hora no formato `”hh:mm:ss”`, que é um formato suportado pelo VBA.

Conversão com `TimeValue`:

A função `TimeValue(horaStr)` converte a string da variável `horaStr` em um valor do tipo `Date` que representa a hora.

Exibição do Resultado:

A função `Format` é usada para assegurar que o valor de hora seja exibido corretamente no formato desejado (`”hh:mm:ss”`).

Você pode adaptar o exemplo acima para manipular e trabalhar com diferentes expressões de tempo conforme necessário no seu projeto. A string de entrada precisa estar em um formato que o VBA reconheça como representando uma hora para evitar erros de execução.

facebooklinkedin