change text box color in a report

[J Lagos]

I want to change the backcolor of textboxes in a report depending on their
value.
I messed with this for a few hours but I'm not savvy with the syntax for
getting at controls in a report.

can anyone suggest a direction.

For example the Textboxes would contain values like "8R", "8S", "10S",

the numbers would change depending on user input, but the letters are
restricted to about 8 different letters that mean different things. I want
to change the color based on the letter value.

[Tom van Stiphout]

On Sun, 06 Jul 2008 05:46:04 GMT, "J Lagos" <ru*********@shaw.ca>
wrote:

Use Conditional Formatting. And make sure the BackStyle of your
control is not Transparent.

-Tom.

>I want to change the backcolor of textboxes in a report depending on their
value.
I messed with this for a few hours but I'm not savvy with the syntax for
getting at controls in a report.

can anyone suggest a direction.

For example the Textboxes would contain values like "8R", "8S", "10S",

the numbers would change depending on user input, but the letters are
restricted to about 8 different letters that mean different things. I want
to change the color based on the letter value.

[J Lagos]

I need more options than conditional formatting provides so I gave this a
go...and it still doesn't work

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Dim ctl As Control
Dim strV
For Each ctl In Me.Section(0).Controls
With ctl
If .Tag = "W" Then
strV = Right(ctl, 1)
Debug.Print ctl.Name
Debug.Print strV
Select Case strV
Case "R"
.BackColor = RGB(255, 224, 244) 'pale red
Case "L"
.BackColor = vbYellow
Case Else
.BackColor = vbRed
End Select
End If
End With
Next ctl
End Sub
"Tom van Stiphout" <no*************@cox.netwrote in message
news:6l********************************@4ax.com...

On Sun, 06 Jul 2008 05:46:04 GMT, "J Lagos" <ru*********@shaw.ca>
wrote:

Use Conditional Formatting. And make sure the BackStyle of your
control is not Transparent.

-Tom.

>>I want to change the backcolor of textboxes in a report depending on their
value.
I messed with this for a few hours but I'm not savvy with the syntax for
getting at controls in a report.

can anyone suggest a direction.

For example the Textboxes would contain values like "8R", "8S", "10S",

the numbers would change depending on user input, but the letters are
restricted to about 8 different letters that mean different things. I want
to change the color based on the letter value.

[Tom van Stiphout]

On Sun, 06 Jul 2008 17:00:39 GMT, "J Lagos" <ru*********@shaw.ca>
wrote:

I pasted your code in a report in the Northwind sample database and it
worked. One gotcha I just learned about: you have to open your report
in code (NOT switch from design view to preview) for the Detail_Format
event to occur:
For example in the immediate window enter:
DoCmd.OpenReport "myReport", acViewPreview

-Tom.

>I need more options than conditional formatting provides so I gave this a
go...and it still doesn't work

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Dim ctl As Control
Dim strV
For Each ctl In Me.Section(0).Controls
With ctl
If .Tag = "W" Then
strV = Right(ctl, 1)
Debug.Print ctl.Name
Debug.Print strV
Select Case strV
Case "R"
.BackColor = RGB(255, 224, 244) 'pale red
Case "L"
.BackColor = vbYellow
Case Else
.BackColor = vbRed
End Select
End If
End With
Next ctl
End Sub
"Tom van Stiphout" <no*************@cox.netwrote in message
news:6l********************************@4ax.com.. .

>On Sun, 06 Jul 2008 05:46:04 GMT, "J Lagos" <ru*********@shaw.ca>
wrote:

Use Conditional Formatting. And make sure the BackStyle of your
control is not Transparent.

-Tom.

>>>I want to change the backcolor of textboxes in a report depending on their
value.
I messed with this for a few hours but I'm not savvy with the syntax for
getting at controls in a report.

can anyone suggest a direction.

For example the Textboxes would contain values like "8R", "8S", "10S",

the numbers would change depending on user input, but the letters are
restricted to about 8 different letters that mean different things. I want
to change the color based on the letter value.

[J Lagos]

The issue is my fault. I had the conditional formatting set in the
textboxes...your reference to conditional formatting clued me in, and I
checked it and removed the conditional formatting and the code ran fine.
"Tom van Stiphout" <no*************@cox.netwrote in message
news:oj********************************@4ax.com...

On Sun, 06 Jul 2008 17:00:39 GMT, "J Lagos" <ru*********@shaw.ca>
wrote:

I pasted your code in a report in the Northwind sample database and it
worked. One gotcha I just learned about: you have to open your report
in code (NOT switch from design view to preview) for the Detail_Format
event to occur:
For example in the immediate window enter:
DoCmd.OpenReport "myReport", acViewPreview

-Tom.

>>I need more options than conditional formatting provides so I gave this a
go...and it still doesn't work

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Dim ctl As Control
Dim strV
For Each ctl In Me.Section(0).Controls
With ctl
If .Tag = "W" Then
strV = Right(ctl, 1)
Debug.Print ctl.Name
Debug.Print strV
Select Case strV
Case "R"
.BackColor = RGB(255, 224, 244) 'pale red
Case "L"
.BackColor = vbYellow
Case Else
.BackColor = vbRed
End Select
End If
End With
Next ctl
End Sub
"Tom van Stiphout" <no*************@cox.netwrote in message
news:6l********************************@4ax.com. ..

>>On Sun, 06 Jul 2008 05:46:04 GMT, "J Lagos" <ru*********@shaw.ca>
wrote:

Use Conditional Formatting. And make sure the BackStyle of your
control is not Transparent.

-Tom.
I want to change the backcolor of textboxes in a report depending on
their
value.
I messed with this for a few hours but I'm not savvy with the syntax for
getting at controls in a report.

can anyone suggest a direction.

For example the Textboxes would contain values like "8R", "8S", "10S",

the numbers would change depending on user input, but the letters are
restricted to about 8 different letters that mean different things. I
want
to change the color based on the letter value.