Conditional formatting

[thrilliam]

I do not know a thing about VBA but i need to expand my conditional formatting options to more than three options

I simply need to change the color of the text in a record in a form based upon a values in another field
ex.
if [Value]>100 make [Customer_Name] Font Red
if [Value]<100 and [Value]>75 make [Customer_Name] Font Orange
if [Value]<75 and [Value]>50 make [Customer_Name] Font Yellow
if [Value]<50 and [Value]>25 make [Customer_Name] Font Green

then if [Value]>100 and [Payment_Received] = "no" make [Customer_Name] Font Red and background blue

etc.

Any help would be greatly appreciated
Thanks,
Will

 

[mhartman1]

Hello:

In your code...

[Customer_Name].ForColor=VbRed
[Customer_Name].ForColor=VbOrange
[Customer_Name].ForColor=VbYellow
[Customer_Name].ForColor=VbGreen
Regards
Mark

 

[thrilliam]

Hmm there has to be more to it than that. I appreciate the help but i still cant get anything to work. I have tried by looking at examples of code but none of it works correctly.

 

[genomon]

[Customer_Name]. looks like a field.
You need to set the control's ForeColor property, i.e.

txtTextBox.ForeColor = vbRed
or
txtTextBox.ForeColor = RGB(255,0,0)

Outside of a dog, a book is man's best friend. Inside of a dog it's too dark to read.

 

[Rofeu]

Hi,

you need the following setup:

Private Sub Worksheet_Change(ByVal Target As Range)

With Target
    Select Case .Value
        Case Is > 100
            .Font.ColorIndex = 3
        Case 75 To 100
            .Font.ColorIndex = 5
        Case "etc..."
    End Select
End With

End Sub

Cheers,

Roel

 

[Rofeu]

btw right click on the tab and then select View Code. That's where you need to put your VBA.

Cheers,

Roel