VBA code for setting the color of records in subform

K

kris

I have subform which is in datasheet view.The subform has a field called
[Status],I want the color of the record( color of the text) to be dependent
on the value of the [Status] field.I have 5 different values for [Status] so
i cannot use the CF in the menu.I have tried the following code as a test for
two value of status,but no luck so far...

Private Sub Form_AfterUpdate()
Select Case Forms![Requirement-status]![requirement-status-display
subform].Form.[Status]
Case Pass
Forms![Requirement-status]![requirement-status-display
subform].Form.[Status].BackColor = 1699999
Case Fail
Forms![Requirement-status]![requirement-status-display
subform].Form.[Status].BackColor = 1675555

End Sub

I tried Me.[Status].Backcolor=value...but it dint work.
I tried putting it under "Private Sub Form_Query()" event also but no result.
I have limited knowledge on VBA coding and new to MS access.CAn anyone
suggest me where I went wrong.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Changing Form BackColor in VB 1
copying a value to a new record in a subform 4
Setting field value if a value exists in another table 3
filtering a form based on the values of a subform 0
a "popup" form 7
Access 2007 Combo Box Search 3
Another Sub Form requery question 1
Subform Help Needed 4

Top