Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Vergleich akt. Datum mit Jetzt

Forumthread: Vergleich akt. Datum mit Jetzt

Vergleich akt. Datum mit Jetzt
03.02.2006 19:54:47
Peter
Hallo,
ich möchte wissen ob eine Datums-Zeiteingabe,
die irgendwann mal mit „Now“ eingefügt wurde, das aktuelle Datum enthält.
Wie macht man das?
Peter
z.B.

Sub aktuelleDatum()
If ActiveCell.Value = Date Then
MsgBox "gefunden"
End If
End Sub

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Vergleich akt. Datum mit Jetzt
03.02.2006 20:16:18
Horst

Sub aktuelleDatum()
If Instr(ActiveCell.Text,Cstr(Date))> 0 Then
MsgBox "gefunden"
End If
End Sub

mfg Horst
AW: Vergleich akt. Datum mit Jetzt -leider nein
03.02.2006 20:30:34
Peter
Hallo,
ich möchte wissen ob eine Datums-Zeiteingabe,
die irgendwann mal mit „Now“ eingefügt wurde, das aktuelle Datum enthält.
Wie macht man das?
Peter
z.B.
Now=Date dann gefunden
03.02.2006 19:18:35=03.02.2006 dann gefunden

Sub aktuelleDatum()
If ActiveCell.Value = Date Then
MsgBox "gefunden"
End If
End Sub

Anzeige
AW: Vergleich akt. Datum mit Jetzt
03.02.2006 20:18:52
Franz
Hallo Peter,
mit Now wird Datum + Uhrzeit eingefügt. Damit deine Abfrage auf Zellwert = Aktuelles Datum funktioniert ist eine kleine Anpassung notwendigt, die die Uhrzeit vom Zellwert abschneidet.
Sub aktuelleDatum()
If Int(ActiveCell.Value) = Date Then
MsgBox "gefunden"
End If
End Sub

Gruß
Franz
Anzeige
AW: Vergleich akt. Datum mit Jetzt-Danke funkt.
03.02.2006 20:34:56
Peter
Danke Franz.
Deine Version funktioniert.
Peter
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18