Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
724to728
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
724to728
724to728
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Vergleich akt. Datum mit Jetzt

Vergleich akt. Datum mit Jetzt
03.02.2006 18: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

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

Betreff
Datum
Anwender
Anzeige
AW: Vergleich akt. Datum mit Jetzt
03.02.2006 19: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 19: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

AW: Vergleich akt. Datum mit Jetzt
03.02.2006 19: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 19:34:56
Peter
Danke Franz.
Deine Version funktioniert.
Peter

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige