<variável id="DateValue_H1">Função DateValue</variável>

Devolve um objeto Date a partir de uma cadeia de caracteres que representa uma data.

O objeto devolvido é representado internamente como um único valor numérico correspondente à data especificada. Este valor pode ser utilizado para calcular o número de dias entre duas datas.

Sintaxe:


  DateValue(date As String)

Parâmetros:

data: Uma cadeia de caracteres que contém a data que será convertida num objeto Date.

A cadeia de caracteres passada para DateValue deve ser expressa num dos formatos de data definidos pela sua configuração de localização (ver - Idiomas e configurações regionais - Geral) ou utilizando o formato de data ISO «aaaa-mm-dd» (ano, mês e dia separados por hífens).

Tipo de retorno:

Date.

Códigos de erro

5 Chamada de procedimento inválido

Exemplo:


  Sub ExampleDateValue
      Dim aDate As Date
      aDate = DateValue("2021-12-20")
      ' Imprime a data localizada
      MsgBox aDate
      ' Extraia o ano, o mês e o dia do objeto de data
      MsgBox Year(aDate)
      MsgBox Month(aDate)
      MsgBox Day(aDate)
      ' Imprime o valor numérico correspondente à data (como tipo Long)
      MsgBox CLng(aDate)
  End Sub

Função DateSerial