Hi Bob,

Thanks for your reply. I am a friend of Rob's who is helping him out with
this.

Just to understand your code, I presume H1:H10 is the range of values that
you are considering, and the "value 1", "value 2" etc are the values that you
are looking for in that range. Hence the "do something" is what you want
doing when a value in your range equals one of your spefied values.

What we are trying to achieve is to say if a value in a range is "red", then
that cell turns red. If the value is "orange", the cell turns orange.

As such the "do something" code would look something like:
.ColorIndex = 6
.Pattern = xlSolid
but I don't know how to refer to the cell that contains the value to change
the formatting as appropriate. Can you (or anyone else) help?

"Bob Phillips" wrote:

Rob,

Yes with event code. Basically of the form

Private Sub Worksheet_Change(ByVal Target As Range)

On Error GoTo ws_exit:
Application.EnableEvents = False
If Not Intersect(Target, Me.Range("H1:H10")) Is Nothing Then
With Target
Select Case .Value
Case "value 1": 'do something
Case "value 2": 'do something else
'etc
End Select
End With
End If

ws_exit:
Application.EnableEvents = True
End Sub

'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select
'the View Code option from the menu, and paste the code in.




--

HTH

RP
(remove nothere from the email address if mailing direct)


"rob curtis" <rob wrote in message
...
Is it possible to have more than 3 conditions using conditional
formatting?

I am dealing with text and not numbers which makes it a little harder to
manipulate. I want up to 10 conditions.

Can anyone advise? Cheers, rob