Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro Help
I need to set a Macro (possibly in VBA) that will change the color of a
selected number of cells based on the text in another cell. For example: When A1 states - FI the row turns orange When A1 states - ALJ the row turns green etc. Since I need to do this to many rows is there also a way to set this by column rather than cell text? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro Help
Yea you can do it,
if you comfortable wiht coding tey using for each loop with each row, or you can loop through cells like you doing and select the entire row and then change the color of the row. I guess it might work Anand.V.V.N -- "Who will guard the guards?" "akemeny" wrote: I need to set a Macro (possibly in VBA) that will change the color of a selected number of cells based on the text in another cell. For example: When A1 states - FI the row turns orange When A1 states - ALJ the row turns green etc. Since I need to do this to many rows is there also a way to set this by column rather than cell text? |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro Help
This macro will do what you asked...
Sub ChangeRowColors() Dim C As Range For Each C In Selection Select Case UCase(C.Value) Case "FI" ColorVal = 45 ' ColorIndex for Orange Case "ALJ" ColorVal = 50 ' ColorIndex for a shade of Green ' ' Add additional Case statements for your other ' codes here (always use upper case for the codes). ' Case Else ColorVal = xlNone End Select C.EntireRow.Interior.ColorIndex = ColorVal Next End Sub Just add the additional Case statements where indicated. The numbers that are being assigned inside the Case statements are ColorIndex values. -- Rick (MVP - Excel) "akemeny" wrote in message ... I need to set a Macro (possibly in VBA) that will change the color of a selected number of cells based on the text in another cell. For example: When A1 states - FI the row turns orange When A1 states - ALJ the row turns green etc. Since I need to do this to many rows is there also a way to set this by column rather than cell text? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Macro to copy and paste values (columns)I have a macro file built | Excel Programming | |||
Macro Help Needed - Excel 2007 - Print Macro with Auto Sort | Excel Worksheet Functions | |||
Macro not showing in Tools/Macro/Macros yet show up when I goto VBA editor | Excel Programming | |||
how to count/sum by function/macro to get the number of record to do copy/paste in macro | Excel Programming | |||
Start Macro / Stop Macro / Restart Macro | Excel Programming |