I have a continuous form with feild 1

[Arob]

I have a continuous form with feild [date needed]. I want to change the backcolor of this field if the system date is greater than the date needed feild. Below is the code I have placed on the Form_current event procedure.

Private Sub Form_Current()
If [DateNeeded] < VBA.Date Then
Me![DateNeeded].BackColor = RGB(0, 255, 0)
Else
Me![DateNeeded].BackColor = RGB(255, 255, 255)
End If
End Sub

However because it is a continuos form, all the date needed fields get changed to green. If I change to a single form and use the navigation buttons the code works. Is there a way to get it to work using a continuous form?

 

[thornmastr]

If you are using A2K or above check out conditional formatting. Robert Berman
Data Base consultant
Vulcan Software Services
thornmastr@yahoo.com

 

[Arob]

Unfortunately I am using A97

 

[thornmastr]

Normally, you would be out of luck, but in this case you can do it. Take a look at this web page anddownload the example for A97. It's free, too.

http://www.mvps.org/access/forms/frm0024.htm

Robert Berman
Data Base consultant
Vulcan Software Services
thornmastr@yahoo.com