macro: changing cell color based on count in cell

Hi,

I need help writing a macro. Column D is filled with various dates. D2 might be 2, D3 might be 55, etc. Also, the number of rows is unknown and may be as large as a thousand or more. There also might be blank cells in the column too.

I need a macro that will go through Column D and change the Fill Color based on criteria:

- If the count in the cell is less than 25, the cell's fill color should change to red

- If the count in the cell is the same or more than 25, the cell's fill color should change to green

Thanks!

Originally Posted by NBVC

You don't need a macro for that.. you can use built in Conditional Formatting

Select entire column D and go to Format|Conditional Formatting

Cell Value Is >> Greater than or equal to >> enter: =25

click Format and go to Pattern tab to choose your colour (green)

Click Ok.

Click Add

Cell Value is >> Greater than >> enter: =0

Click Format and choose colour (red)

Click Ok

Click Ok to finish.

Okay, and what if I wanted the column beside the count to say:

"low" if the count in the cell is less than 25, the cell's fill color should change to red

"high" if the count in the cell is the same or more than 25, the cell's fill color should change to green

P.S. you're an excel genius lol

Originally Posted by NBVC

you would enter a formula in the cell.

e.g. =if(d1<25,"low","high")

if you want those cells coloured too, then select that column and invoke the Conditional Formatting...

Cell Value Is >> equal to >> enter: ="low"

choose red format..

Click Add

Cell Value Is>> equal to >> enter: ="high"

Choose green format

You're a genius, thanks a bundle.