ACCESS -negative Zahlen rot
Liebe ACCESS-Profis, (ACCESS 2003)
wie kann ich in einem Formular, in dem ich ein Feld für den Rechnungsbetrag, der aus Einzelpositionen errechnet wird, und ein Feld, in der die Höhe der Überweisung eingetragen wird, das Feld , das die Differenz zwischen Rechnung und Überweisung ermittelt, rot erscheinen lassen, wenn der Betrag negativ ist.
Mein erster Versuch: im Formular in Formulareigenschaft 'Beim Anzeigen', Ereignisprozedur:
Private Sub Form_Current()
'wenn im Feld Trans_dif1 oder cash_diff ein negativer Wert steht, wird er rot geschrieben
If Forms("F_Registrierung").Controls("transf_diff1").Value < 0 Then
Forms("F_Registrierung").Controls("transf_diff1").ForeColor = vbRed
Else
Forms("F_Registrierung").Controls("transf_diff1").ForeColor = vbBlack
End If
If Forms("F_Registrierung").Controls("cash_diff").Value < 0 Then
Forms("F_Registrierung").Controls("cash_diff").ForeColor = vbRed
Else
Forms("F_Registrierung").Controls("cash_diff").ForeColor = vbBlack
End If
End Sub
klappt nur wenn ich bereits gespeichert habe. Es soll aber sofort in rot erscheinen, wenn ich den Überweisungsbetrag eingetragene habe und sich immer aktualisieren, wenn sich die Differenz ändert.
Mein Eintrag einer Ereignisprozedur in Eigenschaft des Feldes ("transf_diff1") oder ("cash_diff") hat auch nicht den Erfolg gebracht.
Was mache ich falsch?
Vielen DAnk.
Antwort schreiben
Antwort 1 von RalfH vom 17.12.2019, 11:25 Options
Hallo,
Einfach eine bedingte Formartierung hinterlegen.Entwurfsmodus, Feld auswählen, Format, bedingte Formartierung.
Gruß Ralf