A03: Feldwert mit Datums-Jahr vergleichen

30/01/2008 - 18:48 von Rüdiger Gram | Report spam
Hallo NG,

ich versuche die Zahl in einem ungebundenen Feld mit dem aktuellen Jahr
zu vergleichen:

Private Sub NeueresJahr_Click()

If Me.Umsatzjahr < Format(Date, "yyyy") Then Umsatzjahr = Umsatzjahr + 1

Damit will ich erreichen, daß für das Feld [Umsatzjahr] kein höheres Jahr
als das aktuelle Jahr eingestellt werden kann.

Leider funktioniert der Code nicht - d.h. das Umsatzjahr làsst sich munter
über 2008 hochzàhlen. Es kommt auch keine Fehlermeldung.

Woran könnte der Fehler liegen?

Gruß - Rüdiger
 

Lesen sie die antworten

#1 Peter Doering
30/01/2008 - 18:52 | Warnen spam
Hallo,

Rüdiger Gram wrote:

ich versuche die Zahl in einem ungebundenen Feld mit dem aktuellen Jahr
zu vergleichen:

Private Sub NeueresJahr_Click()

If Me.Umsatzjahr < Format(Date, "yyyy") Then Umsatzjahr = Umsatzjahr + 1



If Me.Umsatzjahr < Year(Date) Then Umsatzjahr = Umsatzjahr + 1

Gruss - Peter

Ich beantworte keine Fragen per Email.
Mitglied im http://www.dbdev.org
FAQ: http://www.donkarl.com

Ähnliche fragen