If any cell in named range = 8 then shade named range

[JJ]

How would I do this please?

If any one of the cells in the range("Block_Three") = 8 then shade the
range("Block_Three") yellow.

 

[Tom Ogilvy]

if application.countif(Range("Block_Three"),8) > 0 then
Range("Block_Three").Interior.ColorIndex = 6
End if


or if only exactly 1
if application.countif(Range("Block_Three"),8) = 1 then
Range("Block_Three").Interior.ColorIndex = 6
End if

 

[Doug Glancy]

JJ,

Use Format --> Conditional Formatting in Excel. Highlight Block_Three and
enter this formula in the dialog:

=COUNTIF(Block_Three,8)

Then choose yellow as the format.

hth,

Doug

 

[JJ]

Fantastic Tom, thank you.

if application.countif(Range("Block_Three"),8) > 0 then
Range("Block_Three").Interior.ColorIndex = 6
End if


or if only exactly 1
if application.countif(Range("Block_Three"),8) = 1 then
Range("Block_Three").Interior.ColorIndex = 6
End if