Spis treści
Indeks 🔎︎

# Funkcja FormatDateTime [VBA]

Stosuje format daty i / lub czasu do wyrażenia daty i zwraca wynik jako ciąg.

This constant, function or object is enabled with the statement Option VBASupport 1 placed before the executable program code in a module.

### Składnia:

            FormatDateTime (DateExpression as Date [, NamedFormat as Integer])

### Zwracana wartość:

String

### Parametry:

Wyrazenie_daty: Wyrażenie daty, które ma być sformatowane.

NamedFormat: Opcjonalne wyliczenie wyliczenie vbDateTimeFormat określające format, który ma być zastosowany do daty i godziny. Jeśli zostanie pominięty, używana jest wartość vbGeneralDate.

### Formaty daty i godziny (wyliczanie vbDateTimeFormat)

Named Constant | Value | Opis
--- | --- | ---
vbGeneralDate | 0 | Wyświetla datę i / lub czas zgodnie z ustawieniem daty ogólnej systemu. Jeśli jest wyświetlana tylko data, nie wyświetla się czas; Jeśli jest to tylko czas, nie jest wyświetlana żadna data.
vbLongDate | 1 | Wyświetl datę przy użyciu formatu daty podanej w ustawieniach regionalnych komputera.
vbShortDate | 2 | Wyświetl datę przy użyciu krótkiego formatu daty określonego w ustawieniach regionalnych komputera.
vbLongTime | 3 | Wyświetla czas zdefiniowany w ustawieniach Długiego czasu twojego systemu.
vbShortTime | 4 | Wyświetl czas w formacie 24-godzinnym (hh: mm).

### Kody błędów:

13 Niezgodność typów

### Przykład:

            REM  *****  BASIC  *****
            Option VBASupport 1
            Sub DateFormat
             Dim d as Date
             d = ("1958-01-29 00:25")
             msgbox("Ogólny format daty : " & FormatDateTime(d))
             msgbox("Długi format daty : " & FormatDateTime(d,vbLongDate))
             msgbox("Krótki format daty : " & FormatDateTime(d,vbShortDate))
             msgbox("Długi format czasu : " & FormatDateTime(d,3))
             msgbox("Krótki formatczasu : " & FormatDateTime(d,vbShortTime))
            End Sub

Tematy pokrewne

Funkcje daty i czasu w VBA