Contingut

# Funció FormatDateTime [VBA]

Aplica un format de data i/o d'hora a una expressió de data i retorna el resultat com a cadena de caràcters.

Aquesta constant, funció o objecte s'activa mitjançant l'expressió Option VBASupport 1, col·locada abans del codi executable del programa en un mòdul.

### Sintaxi:

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

### Return type:

String

### Paràmetres :

Date: The date expression to be formatted.

NamedFormat Una llista vbDateTimeFormat opcional que especifica el format que s'ha d'aplicar a l'expressió de data i hora. Si s'omet el valor s'utilitza vbGeneralDate.

### Formats de data i hora (enumeració vbDateTimeFormat)

Constant amb nom | Valor | Descripció
--- | --- | ---
vbGeneralDate | 0 | Displays a date and/or time as defined in your system's General Date setting. If a date only, no time is displayed; If a time only, no date is displayed.
vbLongDate | 1 | Display a date using the long date format specified in your computer's regional settings.
vbShortDate | 2 | Display a date using the short date format specified in your computer's regional settings.
vbLongTime | 3 | Displays a time as defined in your system's Long Time settings.
vbShortTime | 4 | Mostra l'hora utilitzant el format de 24 hores (hh:mm).

### Codis d'error

13 Els tipus de dades no coincideixen

### Exemple :

            REM  *****  BASIC  *****
            Option VBASupport 1
            Sub DateFormat
             Dim d as Date
             d = ("1958-01-29 00:25")
             msgbox("General date format : " & FormatDateTime(d))
             msgbox("Long date format : " & FormatDateTime(d,vbLongDate))
             msgbox("Format de data curt : " & FormatDateTime(d,vbShortDate))
             msgbox("Format d'hora llarg : " & FormatDateTime(d,3))
             msgbox("Format d'hora curt : " & FormatDateTime(d,vbShortTime))
            End Sub

Temes relacionats

Funcions d'hora i data del VBA

Ens cal la vostra ajuda!