set font color depending on value Range
 

greetings,
simple question (I think). Many thanks for any input on this.

Is there a way using Range to set cells to either red or green
depending on whether they are 5% (red), or less (green). I'm on
office 2003.

I'm currently doing this using the looping logic and that's pretty
slow. I'm hoping the range option will be faster.

If Excel.Range(ActiveCell.Offset(1, 110), _
ActiveCell.Offset(1, 1)).Value = 0.05 Then

Excel.Range(ActiveCell.Offset(1, 110), _
ActiveCell.Offset(1, 110)).Font.ColorIndex = 3

Else
Excel.Range(ActiveCell.Offset(1, 110), _
ActiveCell.Offset(1, 110)).Font.ColorIndex = 10
End If

regards,
CG

set font color depending on value Range
 

Have you thought of using conditional formatting as built into Excel?
best wishes
--
Bernard V Liengme
Microsoft Excel MVP
http://people.stfx.ca/bliengme
remove caps from email


"LetMeDoIt" wrote in message
...
greetings,
simple question (I think). Many thanks for any input on this.

Is there a way using Range to set cells to either red or green
depending on whether they are 5% (red), or less (green). I'm on
office 2003.

I'm currently doing this using the looping logic and that's pretty
slow. I'm hoping the range option will be faster.

If Excel.Range(ActiveCell.Offset(1, 110), _
ActiveCell.Offset(1, 1)).Value = 0.05 Then

Excel.Range(ActiveCell.Offset(1, 110), _
ActiveCell.Offset(1, 110)).Font.ColorIndex = 3

Else
Excel.Range(ActiveCell.Offset(1, 110), _
ActiveCell.Offset(1, 110)).Font.ColorIndex = 10
End If

regards,
CG

set font color depending on value Range
 

hhhmmm not sure how conditional setup would be setup in VBA. The
sheets I need to do this are dynamically created.

set font color depending on value Range
 

thanks for the tip, I looked up conditional formatting. I think I'm
ok from here.

regards,
CG

set font color depending on value Range
 

This might help
http://www.ozgrid.com/VBA/excel-cond...ting-limit.htm

--
Bernard V Liengme
Microsoft Excel MVP
http://people.stfx.ca/bliengme
remove caps from email


"LetMeDoIt" wrote in message
...
thanks for the tip, I looked up conditional formatting. I think I'm
ok from here.

regards,
CG