So verwenden sie die datevalue-funktion in vba (mit beispiel)
Sie können die DateValue- Funktion in VBA verwenden, um den Datumswert aus einer bestimmten Zeichenfolge zurückzugeben.
Hier ist eine gängige Methode, diese Funktion in der Praxis zu verwenden:
Sub GetDateValue()
Dim i As Integer
For i = 2 To 7
Range(" B " & i) = DateValue(Range(" A " & i))
Next i
End Sub
Dieses spezielle Makro extrahiert den Datumswert aus Datums- und Uhrzeitangaben im Bereich A2:A7 und gibt diesen Datumswert im entsprechenden Bereich B2:B7 zurück.
Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.
Beispiel: So verwenden Sie die DateValue-Funktion in VBA
Angenommen, wir haben die folgende Datums-/Uhrzeitspalte in Excel:
Angenommen, wir möchten das Datum aus jeder Datums- und Uhrzeitangabe in Spalte A extrahieren und es in Spalte B anzeigen.
Dazu können wir das folgende Makro erstellen:
Sub GetDateValue()
Dim i As Integer
For i = 2 To 7
Range(" B " & i) = DateValue(Range(" A " & i))
Next i
End Sub
Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:
Spalte B zeigt den Datumswert für jedes Datum und jede Uhrzeit in Spalte A an.
Zum Beispiel:
- Die DateValue-Funktion gibt den 01.01.2023 vom 01.01.2023 10:15:34 zurück
- Die DateValue-Funktion gibt den 01.03.2023 vom 01.03.2023 12:34:18 zurück
- Die DateValue-Funktion gibt den 01.05.2023 vom 01.05.2023 8:23:00 zurück
Und so weiter.
Hinweis : Die vollständige Dokumentation der DateValue- 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:
VBA: So vergleichen Sie Daten
VBA: So erhalten Sie den Monatsnamen vom Datum
VBA: Zahl größer als Datum