Función FormatDateTime [VBA]

Aplica un formato de fecha u hora a una expresión de fecha y devuelve el resultado como una cadena de caracteres.

warning

Esta constante, función u objeto se activa mediante la instrucción Option VBASupport 1, colocada antes del código ejecutable del programa en un módulo.


Sintaxis:


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

Valor de retorno:

String

Parámetros:

Date: The date expression to be formatted.

NamedFormat: una enumeración vbDateTimeFormat opcional que especifica el formato que se deberá aplicar a la expresión de fecha y hora. Si se omite, se utiliza el valor vbGeneralDate.

Formatos de fecha y hora (enumeración vbDateTimeFormat)

Constante con nombre

Valor

Descripción

vbGeneralDate

0

Muestra una fecha y/u hora como se define en la configuración de fecha general del sistema.

vbLongDate

1

Muestra una fecha utilizando el formato de fecha largo especificado en la configuración regional del equipo.

vbShortDate

2

Muestra una fecha utilizando el formato de fecha corto especificado en la configuración regional del equipo.

vbLongTime

3

Muestra una hora tal como se define en la configuración de hora larga del sistema.

vbShortTime

4

Muestra una hora utilizando el formato de 24 horas (hh:mm).


Códigos de error:

13 Discordancia de tipo

Ejemplo:


        REM  *****  BASIC  *****
        Option VBASupport 1
        Sub DateFormat
         Dim d as Date
         d = ("1958-01-29 00:25")
         msgbox("Formato general de fecha: " & FormatDateTime(d))
         msgbox("Formato largo de fecha: " & FormatDateTime(d,vbLongDate))
         msgbox("Formato corto de fecha: " & FormatDateTime(d,vbShortDate))
         msgbox("Formato largo de hora: " & FormatDateTime(d,3))
         msgbox("Formato corto de hora: " & FormatDateTime(d,vbShortTime))
        End Sub
    

¡Necesitamos su ayuda!