So verwenden sie die timevalue-funktion in vba (mit beispiel)

Sie können die TimeValue- Funktion in VBA verwenden, um den Zeitwert einer bestimmten Zeichenfolge zurückzugeben.

Hier ist eine gängige Methode, diese Funktion in der Praxis zu verwenden:

 Sub GetTimeValue()
    
Dim i As Integer

For i = 2 To 7
    Range(" B " & i) = TimeValue(Range(" A " & i))
Next i
    
End Sub

Dieses spezielle Makro extrahiert den Zeitwert von Datums- und Uhrzeitangaben im Bereich A2:A7 und gibt diesen Zeitwert im entsprechenden Bereich von B2:B7 zurück.

Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.

Beispiel: So verwenden Sie die TimeValue-Funktion in VBA

Angenommen, wir haben die folgende Datums-/Uhrzeitspalte in Excel:

Angenommen, wir möchten die Uhrzeit aus jeder Datums- und Uhrzeitangabe in Spalte A extrahieren und in Spalte B anzeigen.

Dazu können wir das folgende Makro erstellen:

 Sub GetTimeValue()
    
Dim i As Integer

For i = 2 To 7
    Range(" B " & i) = TimeValue(Range(" A " & i))
Next i
    
End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Spalte B zeigt den Zeitwert für jedes Datum/jede Uhrzeit in Spalte A an.

Zum Beispiel:

• Die TimeValue-Funktion gibt 10:15:34 zum 01.01.2023 um 10:15:34 zurück
• Die TimeValue-Funktion gibt 12:34:18 Uhr ab dem 01.03.2023 12:34:18 Uhr zurück
• Die TimeValue-Funktion gibt 8:23:00 zum 01.05.2023 8:23:00 zurück

Und so weiter.

Hinweis : Die vollständige Dokumentation der TimeValue- Funktion in VBA finden Sie hier .

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

So vergleichen Sie Daten in VBA
So fügen Sie einen Zeitstempel mit VBA ein
So formatieren Sie die Zeit in VBA