如何根据单元格颜色在Excel中隐藏行？

在Excel工作表中，我有一列包含许多不同颜色的单元格，现在，我需要隐藏所有浅蓝色的行，如下图所示。您如何快速轻松地在Excel中处理此任务？

使用VBA代码根据单元格颜色隐藏行

使用Kutools for Excel根据单元格颜色隐藏行

使用VBA代码根据单元格颜色隐藏行

要根据特定背景色隐藏行，以下VBA代码可能会对您有所帮助，请按以下步骤操作：

1. 按住ALT + F11键，然后打开Microsoft Visual Basic for Applications窗口。

2. 点击“插入” > “模块”，并将以下代码粘贴到模块窗口中。

VBA代码：根据单元格颜色隐藏行：

Sub Hidebycolor()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim I As Long
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.Columns(1).AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.Columns(1).AddressLocal
    End If
LInput:
    Set xRg = Application.InputBox("Range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Areas.Count > 1 Then
        MsgBox "does not support multiple selections", vbInformation, "Kutools for Excel"
        GoTo LInput
    End If
    If xRg.Columns.Count > 1 Then
        MsgBox "the selection is not more than 1 column", vbInformation, "Kutools for Excel"
        GoTo LInput
    End If
    On Error Resume Next
    Application.ScreenUpdating = False
    For I = 1 To xRg.Count
        If xRg.Range("A" & I).Interior.ColorIndex = 20 Then
            xRg.Range("A" & I).EntireRow.Hidden = True
        End If
    Next 'i
    Application.ScreenUpdating = True
End Sub

3. 然后按 F5键运行此代码，会弹出一个提示框，提醒您选择要使用的单元格，见截图：

4. 然后点击“确定”按钮，所有浅蓝色的单元格都会立即被隐藏，见截图：

注意：

1. 在上述代码中，脚本 If xRg.Range("A" & I).Interior.ColorIndex = 20 Then中的数字20是颜色索引号，您可以根据需要更改它。

2. 如果您不确定颜色索引号，可以应用以下代码来获取您想知道的颜色索引：

Function GetColor(r As Range) As Integer
GetColor = r.Interior.ColorIndex
End Function

然后输入公式：=GetColor(A2)以返回单元格A2背景的具体颜色索引号，您可以根据需要将A2更改为其他单元格。

使用Kutools for Excel根据单元格颜色隐藏行

如果您有 Kutools for Excel，使用其“选择类似格式单元格”功能，您可以先选择特定颜色的单元格，然后一次性隐藏它们。

安装Kutools for Excel后，请按以下步骤操作：

1. 点击Kutools > 选择 > 选择类似格式单元格，见截图：

2. 在“选择类似格式单元格”对话框中，执行以下操作：

（1.）点击 按钮以选择要使用的数据区域；

（2.）然后点击“从单元格选择格式”按钮，选择您希望基于其隐藏行的特定颜色单元格；

（3.）特定单元格的所有属性都已列出在列表框中，请仅勾选“填充”部分下的“背景色”。

3. 然后点击“确定”按钮，所有具有特定颜色的单元格都会立即被选中，然后点击“开始” > “格式” > “隐藏和取消隐藏” > “隐藏行”，见截图：

4. 然后，选定的具有特定颜色的单元格会被隐藏，见截图：

演示：使用Kutools for Excel根据单元格颜色隐藏行