Bedingte Formatierung in VBA

Hallo zusammen

Eigentlich wäre es ganz einfach. Ich haben in einem Formular ein Feld in dem ein Status als Zahl angezeigt wird ( 1=in Arbeit 2=Abgeschlossen 3=Gestoppt ). Jetzt würde ich gerne den Feldhintergrund je nach Zahl anderst einfärben, dass man es leichter erkennen kann. Wäre ein klassischer Fall für bedingte Formatierung…nur läuft diese Datenbank auf Access97.
Gibts irgendeinen Trick evtl. über VBA wie man das lösen kann.

Danke im Voraus

Andi

Hi Andi,
im onCurrent Ereignis einfach die Backcolor setzen.

Private Sub Form_Current()
If Me![meinStatus] = 1 Then
Me![meinStatus].BackColor = 255
End If
End Sub

HTH
Quaser

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Hallo, Andi!

Eigentlich wäre es ganz einfach. Ich haben in einem Formular
ein Feld in dem ein Status als Zahl angezeigt wird ( 1=in
Arbeit 2=Abgeschlossen 3=Gestoppt ). Jetzt würde ich gerne den
Feldhintergrund je nach Zahl anderst einfärben, dass man es
leichter erkennen kann. Wäre ein klassischer Fall für bedingte
Formatierung…nur läuft diese Datenbank auf Access97.
Gibts irgendeinen Trick evtl. über VBA wie man das lösen kann.

Im Einzelformular wie von Quaser beschrieben. Das funktioniert nur leider im Endlosformular nicht. Hierzu eine Lösung: http://www.donkarl.com/AccessFAQ.htm unter 4.1 Verschiedene Farben im Endlosformular (siehe auch Verweis auf Stephen Lebans).

Gruß, Manfred

Danke euch zwei!! (owt)
.