How to Change the Color of multiple cells when multiple cells returns text of "x"

B

b_mcmillen2002

Hi Everyone. I have figured out how to change the color of a cell based
on the result of another cell but, to write individual formulas for
each cell would take too long. I am dealing with at least 1,200 cells.


Is there a way to have the worksheet automatically update each cell as
the other range of cells text result = "x"??

It will probably have to be an if then statement on a range or possibly
an array? Im of course guessing.

I want a cell to turn black if another cell's text = "x"
If the cell text = " " Then the color be white or none (x1None).

Also, the code must work while the sheet is protected.

Can Anyone help. It will greatly be appreciated. Thanks!

Sample of what I had is:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Range("DR30").Text = "x" Then
Range("N30").Interior.ColorIndex = 56
ElseIf Range("DR30").Text = " " Then
Range("N30").Interior.ColorIndex = x1None
End If

End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top