VBA-Formatzeit

In diesem Tutorial wird gezeigt, wie Sie die Funktion VBA formatieren zum Formatieren der Zeit verwenden.

Funktion und Uhrzeit formatieren

VBA-Formatzeit mit vordefinierten Formaten

Die VBA-Format-Funktion kann verwendet werden, um eine Zahl in eine Zeichenfolge mit einem vordefinierten Format zu konvertieren. Die verfügbaren Formate für Zeit sind lange Zeit, mittlere Zeit und kurze Zeit.

1234567891011121314

UnterformatZeitBeispiel_1()Dim DateEx als DatumDateEx = #4/18/2020 18:05:07 #MsgBox-Format (DateEx, "Long Time") 'Ergebnis ist: 18:05:07MsgBox-Format (DateEx, "Medium Time") 'Ergebnis ist: 18:05 UhrMsgBox-Format (DateEx, "Kurze Zeit") 'Ergebnis: 18:05DateEx = #2/18/2021 6:05:07 #MsgBox Format(DateEx, "Long Time") 'Ergebnis ist: 6:05:07 AMMsgBox Format (DateEx, "Medium Time") 'Ergebnis ist: 06:05 AMMsgBox-Format (DateEx, "Kurze Zeit") 'Ergebnis: 06:05End Sub

VBA-Formatzeit mit benutzerdefinierten Formaten

Die VBA-Format-Funktion kann verwendet werden, um eine Zahl mit benutzerdefinierten Formaten in eine Zeichenfolge zu konvertieren. Symbole h und hh werden für Stunden verwendet, n und nn für Minuten, s und ss für Sekunden, ttttt für Vollzeit gemäß den Systemeinstellungen und AM/PM, am/pm, A/P, a/p, AMPM für die am -pm-System.

1234567891011121314151617

SubformatTimeExample_2()Dim DateEx als DatumDateEx = #4/18/2020 18:05:07 #MsgBox Format(DateEx, "hh:nn:ss") 'Ergebnis: 18:05:07MsgBox Format(DateEx, "h:n:s AM/PM") 'Ergebnis ist: 18:5:7MsgBox Format(DateEx, "h") 'Ergebnis ist: 18MsgBox-Format (DateEx, "hh") 'Ergebnis ist: 18MsgBox Format(DateEx, "h:n") 'Ergebnis: 18:5MsgBox Format(DateEx, "hh:nn") 'Ergebnis: 18:05MsgBox Format(DateEx, "hh:nn:s") 'Ergebnis: 18:05:7MsgBox Format(DateEx, "hh:nn:ss") 'Ergebnis: 18:05:07MsgBox-Format(DateEx, "\T\i\m\e\ \i\s\:\ hh:nn:ss")'Ergebnis ist: Zeit ist: 18:05:07End Sub