In VBA (Visual Basic for Applications) wird die `TimeValue`-Funktion verwendet, um eine Zeit aus einer Zeichenfolge zu extrahieren und als `Date`-Datentyp zu speichern. Diese Funktion ist nützlich, wenn Sie mit Zeitwerten innerhalb von VBA arbeiten möchten.
Die Syntax für die `TimeValue`-Funktion lautet:
TimeValue(time)
- time: Ein erforderlicher Parameter, der eine Zeichenfolge ist, die die Zeit in einem der Zeitformate darstellt.
Diese Funktion gibt den Zeitanteil eines Datums zurück, während das Datum ignoriert wird. Hier sind einige Beispiele, wie man die `TimeValue`-Funktion in VBA verwenden kann:
Beispiel 1: Einfache Verwendung
Sub BeispielTimeValue()
Dim meineZeit As Date
meineZeit = TimeValue("14:30:00") ' Setzt meineZeit auf 14:30:00 Uhr
MsgBox "Die Zeit ist: " & Format(meineZeit, "hh:mm:ss")
End Sub
Beispiel 2: Mit Variablen
Sub BeispielMitVariable()
Dim zeitString As String
Dim zeitWert As Date
zeitString = "8:15 PM"
zeitWert = TimeValue(zeitString)
MsgBox "Die umgewandelte Zeit ist: " & Format(zeitWert, "hh:mm:ss AM/PM")
End Sub
Beachten Sie:
- Die `time`-Zeichenfolge kann verschiedene gängige Zeitformate enthalten, wie z. B. “HH:MM”, “HH:MM:SS”, oder diese mit ‘AM’/’PM’ ergänzt werden.
- Wenn der `time`-Parameter ein ungültiges Zeitformat aufweist, wird ein Laufzeitfehler ausgelöst.
Durch die Verwendung dieser Funktion können Sie Zeiten leicht extrahieren und sie in Ihren Anwendungen verwenden, ohne dass die Datumsbestandteile berücksichtigt werden.