Change colour of text in Report if date overdue (97)

Topic

New Reply

Hello there

I am sure I have seen somewhere that this can be done, but you know what it’s like.. when you want that something you saw, you cant find it!!

In my report I want to have the field called “Due Date”. I want the text to be Red if the date is equal to or less than to todays date. (meaning overdue) If colour is not possible, bold or underline?

Is this possible?

Regards

Kerry

Reply | Quote

Replies

In the On Format of the detail enter the following code :

If Me.[Due Date] <= Now() Then
   Me.Myfield.ForeColor = VbRed
Else
   Me.Myfield.ForeColor = VbBlack
End If

Replace Myfield with the name of the field you want to be red.

Reply | Quote

Thankyou Francois

Reply | Quote