Formatting Field to Bold Red

[JJman]

I'm no VBA guru, but I'm trying to use the code below to change the appearance of a field to bold red if the condition is met. It changes the font color to red just fine, but does not bold it. Nor does it give me any kind of error. Can someone please tell me what I'm doing wrong?

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

If Avg1 >= 3 Then
Avg1.ForeColor = vbRed
Avg1.FontWeight = vbBold
End If

End Sub

 

[TonyJollans]

Hi JJman,

I don't think there is a vbBold. You could try ..

[blue]Avg1.FontWeight = 700[/blue]

.. or ..

[blue]Avg1.FontBold = True[/blue]

Enjoy,
Tony

--------------------------------------------------------------------------------------------
We want to help you; help us to do it by reading this: Before you ask a question.

 

[Acdel]

Why don't you use Conditional Formating...? Try the format menu in your report edit view...

 

[JJman]

Hi Acdel,

I was using conditional formatting before, but it wasn't working. It would apply the formatting even when the value was only 2. Very strange, I know. This is why I decided to code it instead. Anyway, I'll give Tony's ideas a shot.

Thanks to you both!

 

[JJman]

Both ways worked great, Tony. Thanks again. May I ask where you got the value of 700 for bold formatting? I'd love to have a list of things like that.

 

[TonyJollans]

Hi JJman,

All the information is in Help (under FontWeight).

Enjoy,
Tony

--------------------------------------------------------------------------------------------
We want to help you; help us to do it by reading this: Before you ask a question.