changing color of record

  • Thread starter Thread starter Amir
  • Start date Start date
A

Amir

Hi,
i would like to change color of record(or a specific
textbox)if the right conditions are met. For example; i
would like to highlight a record that repeats if FullName
and DateWorked are found twice on same report. in other
words If for John Doe there are two records for one day I
would like to highlight one or both records, which ever is
possible. the report is formated as following; FullName is
in Header and DateWorked is in detail section with some
other info like annualhours, sick,....If I can highlight a
whole record(s) that is great if not maybe just a date
field....
 
See "conditional formatting" and build expression to do what you need. Use the "Format" that is on the top grey bar when you have your control selected.
 
Amir said:
i would like to change color of record(or a specific
textbox)if the right conditions are met. For example; i
would like to highlight a record that repeats if FullName
and DateWorked are found twice on same report. in other
words If for John Doe there are two records for one day I
would like to highlight one or both records, which ever is
possible. the report is formated as following; FullName is
in Header and DateWorked is in detail section with some
other info like annualhours, sick,....If I can highlight a
whole record(s) that is great if not maybe just a date
field....
Click to expand...


Create a group level for the DateWorked field add a header
section for this group and make it invisible. Place a text
box named txtDateCount in the header and set its control
source expression to =Count(*). This allows the header's
event procedures to determine how many details have the same
date.

Now add code to the header section's Format event to set the
detail control's color:

If Me.txtDateCount > 1 Then
Me.detailtextbox1.ForeColor = vbGreen
Me.detailtextbox2.ForeColor = vbGreen
. . .
Else
Me.detailtextbox1.ForeColor = vbBlack
Me.detailtextbox2.ForeColor = vbBlack
. . .
End If
 
thank you,
I will try that tommorow.
-----Original Message-----



Create a group level for the DateWorked field add a header
section for this group and make it invisible. Place a text
box named txtDateCount in the header and set its control
source expression to =Count(*). This allows the header's
event procedures to determine how many details have the same
date.

Now add code to the header section's Format event to set the
detail control's color:

If Me.txtDateCount > 1 Then
Me.detailtextbox1.ForeColor = vbGreen
Me.detailtextbox2.ForeColor = vbGreen
. . .
Else
Me.detailtextbox1.ForeColor = vbBlack
Me.detailtextbox2.ForeColor = vbBlack
. . .
End If
Click to expand...
 
Back
Top