Abgelaufenes Datum 'rot' darstellen

Ich möchte, daß Access mir in einem Feld, welches ein Ablaufdatum anzeigt, das Datum rot anzeigt. Kann mir jemand die Syntax nennen. In welches Ereignisfeld in den Eigenschaften sollte ich das eintragen („nach Aktualiesierung“)?

Vielen Dank vorab.

Jens

Ich möchte, daß Access mir in einem Feld, welches ein
Ablaufdatum anzeigt, das Datum rot anzeigt. Kann mir jemand
die Syntax nennen. In welches Ereignisfeld in den
Eigenschaften sollte ich das eintragen („nach
Aktualiesierung“)?

Ebenfalls guten Tag.

Die zu bearbeitende Eigenschaft heißt „Textfarbe“ (in VBA ForeColor). Ich gehe jetzt davon aus, dass das Datum, so lange es noch nicht abgelaufen ist, normal (von Mainz wegen schwarz) dargestellt werden soll und erst nach Ablauf rot. Das erreichst Du mit folgender Prozedur :

Sub Form\_Current()
If AblaufDatum Soll das Datum vom Benutzer bearbeitet werden, ist die gleiche Prozedur noch im AfterUpdate- Ereignis zu verankern, also

    Sub AblaufDatum\_AfterUpdate()
    If AblaufDatum Je nachdem kannst Du entsprechende Maßnahmen noch mit anderen Ereignissen verknüpfen. Die Prozedur selbst bleibt immer die gleiche ...
    
    Achtung : Das funktioniert so natürlich nur im Einzelformular. In einem Endlosformular musst Du noch ein paar Tricks anwenden - bei Bedarf nochmals nachfragen.
    
    Gruß kw

Moin,

Ich möchte, daß Access mir in einem Feld, welches ein
Ablaufdatum anzeigt, das Datum rot anzeigt.

Ich gehe mal davon aus, daß du das Feld mit nem anderen
Wert vergleichen wirst, um dann zu entscheiden: Rot - Normal

Kann mir jemand
die Syntax nennen. In welches Ereignisfeld in den
Eigenschaften sollte ich das eintragen („nach
Aktualiesierung“)?

Wenn ich oben richtig liege, dann einfach das Feld markieren und
über Format-bedingte Formatierung die entsprechenden Einstellungen
vornehmen. Wenn ich falsch liege, dann fehlt in deiner Beschreibung
noch die Aussage, WANN denn das Ablaufdatum rot werden soll.

Gruß
D. Scholdei

Achtung : Das funktioniert so natürlich nur im Einzelformular.
In einem Endlosformular musst Du noch ein paar Tricks anwenden

  • bei Bedarf nochmals nachfragen.

Gruß kw

Hallo - vielen Dank. DAS hat schon mal funktioniert.

Jetzt komm ich nochmal auf deine o.g. Problematik zu sprechen. Es ist genau der Fall. Ist das zulest eingegebene Datum in der Zukunft (schwarz) und ich scrolle so lustig duch die Datensätze - daaaaaaaaaaaaaaann ist es genau wie du gesagt hast - alle schwarz. Bzw. anders herum.

Also besteht „bedarf“ :smile: und ich frach nochma naaach. ^^

Hallo Jens,
du musst zuesrt die Navigation deines Formulars unsichtbar machen und dir eine eigene Navigation basteln. Dann auf jeden Nächster, Erster usw Button die Prozedur legen , die das Datum prüft und dann die Texteigenschaft der Anzeige im Feld Datum ändert.
Wenn du sonst keine Sorgen hast, viel Spass.
Es geht nicht in der Tabelle.

Gruß Hans

Hallo,

du hast es schon richtig beschrieben. Das war übrigens genau der Punkt. Im Moment funktioniert es auch in meinem Endlosformular.

Vielen Dank (auch @kw und Hans)

Gruß,

Jens

Ahoi.

Jetzt komm ich nochmal auf deine o.g. Problematik zu sprechen.
Es ist genau der Fall. Ist das zulest eingegebene Datum in der
Zukunft (schwarz) und ich scrolle so lustig duch die
Datensätze - daaaaaaaaaaaaaaann ist es genau wie du gesagt
hast - alle schwarz. Bzw. anders herum.

Wenn Du moderner als Access 97 bist, ist das ja mit der bedingten formatierung schon erlederitzt - od’r?

Gruß kw

@kw - so konnte ich das erledigen - prima.

D A N K E

Ahoi.

Wenn Du moderner als Access 97 bist, ist das ja mit der
bedingten formatierung schon erlederitzt - od’r?

Gruß kw