displaying different font colour on the report when 1

[hengsin]

How can i display the different colour on the report when user open the report. For example:
When the ActionStatus is Open, i want to the whole line to become Red
When the ActionStatus is In Progress, i want the whole line to become Yellow
When the ActionStatus is Closed, i want the whole line to become Green.

 

[danvlas]

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)

Dim varColor as Long
Select Case ActionStatus
Case "Open"
varColor = 255
Case "In progress"
varColor = 32768
Case "Closed"
varColor = 8454143
Case Else
varColor = 0
End Select
Me.Section(0).BackColor = varColor

End Sub

Good luck



Daniel Vlas
Systems Consultant

http://www.geocities.com/danvlas/AutoMail.html