Função FormatDateTime [VBA]

Aplica um formato de data e/ou hora a uma expressão de data e devolve o resultado como uma cadeia de caracteres.

Esta constante, função ou objeto é ativado através da instrução Option VBASupport 1, colocada antes do código executável do programa num módulo.

Sintaxe:


        FormatDateTime (Date As Date [, NamedFormat As Integer])

Tipo de retorno:

String

Parâmetros:

Data: A expressão de data a formatar.

NamedFormat: Uma enumeração opcional vbDateTimeFormat que especifica o formato a aplicar à expressão de data e hora. Se for omitida, é utilizado o valor vbGeneralDate.

Formatos de data e hora (enumeração vbDateTimeFormat)

Constante com nome	Valor	Descrição
vbGeneralDate	0	Apresenta uma data e/ou hora, conforme definido na configuração «Data geral» do seu sistema. Se for apenas uma data, não é apresentada a hora; se for apenas uma hora, não é apresentada a data.
vbLongDate	1	Exibe uma data utilizando o formato de data longo especificado nas definições regionais do seu computador.
vbShortDate	2	Exibir uma data utilizando o formato de data curto especificado nas definições regionais do seu computador.
vbLongTime	3	Apresenta a hora conforme definido nas definições de «Hora longa» do seu sistema.
vbShortTime	4	Mostrar uma hora no formato de 24 horas (hh:mm).

Códigos de erro

13 Disparidade no tipo de dados

Exemplo:


        REM  *****  BASIC  *****
        Option VBASupport 1
        Sub DateFormat
         Dim d as Date
         d = ("1958-01-29 00:25")
         msgbox("Formato geral da data: " & FormatDateTime(d))
         msgbox("Formato de data longo: " & FormatDateTime(d, vbLongDate))
         msgbox("Formato de data curto: " & FormatDateTime(d, vbShortDate))
         msgbox("Formato de data e hora longa: " & FormatDateTime(d, 3))
         msgbox("Formato de hora curto: " & FormatDateTime(d, vbShortTime))
        End Sub

Funções de data e hora do VBA