Replacing Background Colors in Cells

Jozef is looking for a way to change background colors of specific cells in the worksheet he created. For example, he would like to find all red background cells and change them to blue or find all yellow backgrounds and change them to blue. Jozef wonders if there is an easy way to do this.

It's fairly obvious that you can change the background colors of any cells manually, so there is no need to go into that option for making the changes. What you need to do is use a simple tool, such as the Find and Replace tool, to make the color changes. Follow these steps:

1. Press Ctrl+H to display the Replace tab of the Find and Replace dialog box.
2. Expand the dialog box by clicking the Options button. (See Figure 1.)



Figure 1. The Replace tab of the Find and Replace dialog box.

3. Click the Format button at the right side of the Find What box. Excel displays the Find Format dialog box.
4. Make sure the Fill tab is selected. (See Figure 2.)



Figure 2. The Fill tab of the Find Format dialog box.

5. Use the controls in the dialog box to specify the background color you want to replace.
6. Click OK.
7. Click the Format button at the right side of the Replace With box. Excel displays the Replace Format dialog box.
8. Make sure the Fill tab is selected.
9. Use the controls in the dialog box to specify the background color you used when changing the cells.
10. Click OK.
11. Click Replace All.

If you find yourself needing to make the same color changes over and over (for instance, always changing from red to blue), then you may be interested in using a macro to do the changes. The following example could be assigned to a shortcut key or added to the Quick Access Toolbar so you can use it quickly:

Sub ChangeColor()
    Dim rCell As Range
    If Selection.Cells.Count = 1 Then
        MsgBox "Select the range to be processed."
        Exit Sub
    End If
    For Each rCell In Selection
        If rCell.Interior.Color = RGB(255, 0, 0) Then  'red
            rCell.Interior.Color = RGB(0, 0, 255)      'blue
        End If
    Next rCell
End Sub

ExcelTips is your source for cost-effective Microsoft Excel training. This tip (9043) applies to Microsoft Excel 2007, 2010, 2013, 2016, 2019, and Excel in Office 365. You can find a version of this tip for the older menu interface of Excel here: Replacing Background Colors in Cells.