Um das Datumsformat in Excel VBA anzupassen, kannst du die Funktion CDate verwenden, um ein Datum aus einem Textstring zu erstellen. Hier ist eine einfache Schritt-für-Schritt-Anleitung:
Deklariere eine Public-Variable für das Datum in deinem Modul:
Public Datum As DateWeise der Variable den Wert aus einer ComboBox zu und füge eine Zeit hinzu:
Datum = CDate(cmbDatum.Value & " 06:00:00")Um das Datum im gewünschten Format YYYY-MM-DD HH:MM:SS zu erhalten, verwende die Format-Funktion:
MsgBox Format(Datum, "YYYY-MM-DD HH:MM:SS")Wenn du das Datum in einer SQL-Abfrage verwenden möchtest, kannst du Folgendes tun:
WHERE (DELAY_STATISTIC_DAY.DAY={ts '" & Format(Datum, "yyyy-mm-dd HH:MM:SS") & "'})Fehler: Ungültiges Format
dd/mm/yyyy.Fehler: Datentyp-Konflikte
CDate, um sicherzustellen, dass der String in ein Datum umgewandelt wird.Wenn du das Datumsformat in Excel VBA ändern möchtest, gibt es verschiedene Methoden:
Direkte Zuweisung mit TimeValue:
Datum = CDate(cmbDatum.Value) + TimeValue("06:12:34")Formatierung in der SQL-Abfrage: Anstatt das Datum vorher zu formatieren, kannst du auch direkt im SQL-String formatieren:
WHERE (DELAY_STATISTIC_DAY.DAY={ts '" & Format(CDate(cmbDatum.Value), "yyyy-mm-dd") & " 06:00:00'})Hier sind einige praktische Beispiele, wie du das Datumsformat in VBA anpassen kannst:
Beispiel 1: Einfaches Datumsformat
Dim Datum As Date
Datum = CDate("21/08/2011 06:00:00")
MsgBox Format(Datum, "YYYY-MM-DD HH:MM:SS") ' Ausgabe: 2011-08-21 06:00:00Beispiel 2: Verwendung in einer SQL-Abfrage
Dim StrSQL As String
StrSQL = "SELECT * FROM DELAY_STATISTIC_DAY WHERE (DAY={ts '" & Format(Datum, "yyyy-mm-dd HH:MM:SS") & "'})"Format-Funktion, um das Datum in verschiedenen Formaten auszugeben, z.B. dd/mm/yyyy oder yyyy-mm-dd.Now-Funktion, um das aktuelle Datum und die aktuelle Uhrzeit zu erhalten:
MsgBox Format(Now, "YYYY-MM-DD HH:MM:SS")1. Wie kann ich ein Datum im Format dd/mm/yyyy anzeigen?
Um ein Datum im Format dd/mm/yyyy anzuzeigen, kannst du folgendes verwenden:
MsgBox Format(Datum, "dd/mm/yyyy")2. Was ist der Unterschied zwischen CDate und Format?
CDate konvertiert einen String in einen Datentyp, während Format das Aussehen eines Datums oder einer Zahl verändert, ohne den Datentyp zu ändern.
3. Kann ich ein Datum in ein benutzerdefiniertes Format umwandeln?
Ja, du kannst Format mit verschiedenen Platzhaltern verwenden, um das Datum in dein gewünschtes Format zu bringen, z.B. Format(Datum, "yyyy-mm-dd").