cell range format based on another cell value

**excelforwork** · 07-22-2011, 04:23 PM

I would like to change the visual format of a range of cells based on the value I choose in a different cell.

Example: Based on the value entered in to cell B8 (an X or an 0), I would like a range of cells (F10;G14) to change the font color.

---------------------
Also, is there a way change the color of a font of a cell, if the value of that cell, is equal to the value in a range of cells?

**maczaq** · 07-22-2011, 04:35 PM

try this code in sheet where you want to use this formatting

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Address = "$B$8" Then
  Set Rng = Range("F10:G14")
    Select Case UCase(Target.Value)
        Case "X":
            Rng.Interior.ColorIndex = 3
        Case 0:
            Rng.Interior.ColorIndex = 45
        Case "":
            Rng.Interior.ColorIndex = none
        Case Else
            Rng.Interior.ColorIndex = none
    End Select
 End If
End Sub

Best Regards
MaczaQ