View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Don Guillett[_4_] Don Guillett[_4_] is offline
external usenet poster
 
Posts: 2,337
Default Color Rows Automatically

The good news is
You can use conditional formatting on more than one cell. Either select the
cells first and
formula is =$A$34 and set format.
OR do it for one and copy. The trick here is the $'s to make the reference
absolute.

The bad news is that you are restricted to 3 conditional formats so you need
a macro like this which you would need to modify to suit your needs.

Sub Progresscolor()
With ActiveCell.EntireRow.Interior
Select Case [a14]
Case 1: .ColorIndex = 4
Case 2: .ColorIndex = 5
Case 3: .ColorIndex = 6
Case 4: .ColorIndex = 7
Case Else: .ColorIndex = xlNone
End Select
End With
End Sub

--
Don Guillett
SalesAid Software

"Scott V." wrote in message
...
Hello,
I would like to set a parameter so that when a certain
cell reaches a given value the entire row will turn a
specific color or be stricken through. Example is below...

Completed...... Strikethrough
In Progress...... Green
Not Started...... Blue
Started........ Yellow

I have tried to use the conditional formatting and that
works well but is limited by only the current cell, vs the
entire row and this causes a reading issue. Is there an
answer for this?

Any and all help will be greatly appreciated.

Thanks,

Scott