View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Gary Gary is offline
external usenet poster
 
Posts: 143
Default Something more than Conditional Formatting

Hi Ronald,

I think this would work but am unable to figure out how.

am new to coding.

please help.

"Ronald Dodge" wrote in message
...
This is a case where you will then need to turn to VBA coding to help you
out in this process such as the following:

With Thisworkbook.Worksheets("Sheet1")
For I = lngFRW to lngLRW Step 1
Select Case VBA.UCase(.Range("X" & CStr(I)).Text)
Case "A"
.Range(CStr(I) & ":" & CStr(I)).Interior.ColorIndex = 1
Case "B"
.Range(CStr(I) & ":" & CStr(I)).Interior.ColorIndex = 2
Case "C"
.Range(CStr(I) & ":" & CStr(I)).Interior.ColorIndex = 3
Case "D"
.Range(CStr(I) & ":" & CStr(I)).Interior.ColorIndex = 4
Case "E"
.Range(CStr(I) & ":" & CStr(I)).Interior.ColorIndex = 5
. . . .
Case "X"
.Range(CStr(I) & ":" & CStr(I)).Interior.ColorIndex = 30
Case "Y"
.Range(CStr(I) & ":" & CStr(I)).Interior.ColorIndex = 31
Case "Z"
.Range(CStr(I) & ":" & CStr(I)).Interior.ColorIndex = 32
End Select
Next I
End With

For the color index codes, you may want to refer to:

http://www.mvps.org/dmcritchie/excel/colors.htm#palette

You will need to scroll on down until you see the different colors and
it's
in order from 1 to 56. This does assume the default colors and that none
of
the colors has been changed within the color tab of the Options dialog
box.

--
Ronald R. Dodge, Jr.
Production Statistician/Programmer
Master MOUS 2000

"Gary" wrote in message
...
Hi,

I have 7000 rows, 5 columns.

I need to highlight the entire row if the value in column 5 is X

conditional formatting is limited to 3. I may have more than 10

criterion.
i.e. X, Y, Z, A, B, C, D, E, F, G, etc etc


Please help.
Thanks