Datum abfrage
06.05.2004 13:17:13
Bastian
Ich möchte mir die Tage und die Stunden, Minuten, Sekunden bis zum 22.06.2004 anzeigen lassen. Ich habe es bis jetzt nur mit den Tagen hinbekommen.
Sub test()
Dim x As Long
x = DateValue("22.06.2004 12:00:00") - DateValue(Now())
End Sub
Könnt ihr mir da weiterhelfen?
Danke. Gruß Basti
Anzeige