S
scott04
I have the following code that makes each line red when the number of
workingdays >10:
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If WorkingDays2([Date_Filed], [Summary_Date]) > 10 Then
Me.Section(acDetail).BackColor = 255
Else
Me.Section(acDetail).BackColor = 16777215
End If
Everything works fine however upon looking at the report i would rather have
the row of fields in my report change font color to red instead of the
section. One of the fields in the report is me.case_no. I have tried to add
the code of :
If WorkingDays2([Date_Filed], [Summary_Date]) > 10 Then
Me.Case_No.ForeColor = vbRed
However all records are now showing in Red and not just the ones with more
than 10 days. Any thoughts or suggestions?
workingdays >10:
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If WorkingDays2([Date_Filed], [Summary_Date]) > 10 Then
Me.Section(acDetail).BackColor = 255
Else
Me.Section(acDetail).BackColor = 16777215
End If
Everything works fine however upon looking at the report i would rather have
the row of fields in my report change font color to red instead of the
section. One of the fields in the report is me.case_no. I have tried to add
the code of :
If WorkingDays2([Date_Filed], [Summary_Date]) > 10 Then
Me.Case_No.ForeColor = vbRed
However all records are now showing in Red and not just the ones with more
than 10 days. Any thoughts or suggestions?