Apply VBA code to individual records

[edwilli]

I have a form with multiple records on it. These records fall into two categories: approved, or not approved. Records that are approved I would like to highlight in green. However the following code only looks at the first record and applies the results to ALL the records:

Private Sub Form_Load()
If intStatus = 2 Then
Me.RecordTitle.ForeColor = RGB(0, 255, 0)
End If
End Sub

How can I have this logic applied to each individual record?

Many thanks in advance!

Eric

 

[cjowsey]

I've never got it to work with subforms and I have never tried too hard. In Access 2000 or better (I don't know about earlier versions), there is Conditional Formatting under the Format menu. This might help.

 

[edwilli]

This isn't a sub form. The code is a subroutine I run when the form is loaded. Unfortunately the code cannot distinguish the between the multiple records on the form.

 

[cjowsey]

Ooh! I thought you meant multiple records "at the same time". Do you mean that you can navigate through a recordset on the form one record at a time?

If so, put the code in the Form_Current event rather than Form_Load.

If not, then I don't understand how you are displaying more than one record on the form.