Datum als Bedingung

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox


Excel-Version: 9.0 (Office 2000)
nach unten

Betrifft: Datum als Bedingung
von: Wolle
Geschrieben am: 28.06.2002 - 12:54:34

Hallo zusammen,

Ich möchte in meinem Makro eine Datumsabfrage einbauen.
Wenn z.B. der 08.08.2002 überschritten ist soll eine MsgBox erscheinen die den Benutzer an eine bestimmte Sache erinnert.

Kann mir jemand dabei helfen.

MFG, Wolle


nach oben   nach unten

Re: Datum als Bedingung
von: Michael Wendeler
Geschrieben am: 28.06.2002 - 13:05:01

Hallo Wolle,

so muss es ausschauen:

Const Datum = #8/08/02# 'MM/TT/JJJJ
If Date >= Datum Then
MsgBox("Datum überschritten")

Gruß
M. Wendeler
http://www.wendelers.de

nach oben   nach unten

Re: Datum als Bedingung
von: frank p
Geschrieben am: 28.06.2002 - 13:09:59

wie folgt


Sub erinnerung()
Dim As Date
d = Now
Dim As Date
t = "06.03.2002"

If d > t Then
    MsgBox "mein Geburtstag ist vorbei :-(("
Else
    MsgBox "Du hast noch Zeit " & "es ist erst der : & d"
End If

End Sub

Gruss Frank P

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Datum als Bedingung"