Excelでセルの色に基づいて行を非表示にする方法は？

Excelワークシートに、さまざまな色のセルのリストがあります。次のスクリーンショットのように、水色の行をすべて非表示にする必要があります。Excelでこのタスクをすばやく簡単に処理するにはどうすればよいですか？

VBAコードを使用してセルの色に基づいて行を非表示にする

Kutools forExcelでセルの色に基づいて行を非表示にする

VBAコードを使用してセルの色に基づいて行を非表示にする

特定の背景色に基づいて行を非表示にするには、次のVBAコードが役立つ場合があります。次のようにしてください。

1。 を押し続けます Alt + F11 キーを押すと、 アプリケーション向け Microsoft Visual Basic 窓。

2に設定します。 OK をクリックします。 インセット > モジュール、次のコードをに貼り付けます モジュール 窓。

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。 そして、 OK ボタンをクリックすると、すべての水色のセルが一度に非表示になります。スクリーンショットを参照してください。

注意：

1。 上記のコードでは、番号 20 このスクリプト内 xRg.Range（ "A"＆I）.Interior.ColorIndex = 20の場合 次に、カラーインデックス番号です。必要に応じて変更できます。

2。 カラーインデックス番号がわからない場合は、次のコードを適用して、知りたいカラーインデックスを取得する必要があります。

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

次に、式を入力します。 = GetColor（A2） セルA2の背景の特定のカラーインデックス番号を返すには、必要に応じてA2を他の色に変更します。

Kutools forExcelでセルの色に基づいて行を非表示にする

あなたが持っている場合 Kutools for Excelそのと フォーマット付きのセルを選択 ユーティリティでは、最初に特定の色のセルを選択してから、一度に非表示にすることができます。

インストールした後 Kutools for Excel、次のようにしてください。

1に設定します。 OK をクリックします。 クツール > 選択 > フォーマット付きのセルを選択、スクリーンショットを参照してください：

2。 の中に フォーマット付きのセルを選択 ダイアログボックスで、以下の操作を行います。

（1.）クリック 使用するデータ範囲を選択するボタン。

（2.）次にクリックします セルからフォーマットを選択 ボタンを押して、行を非表示にする特定の色付きセルを選択します。

（3.）特定のセルのすべての属性がリストボックスにリストされています。チェックしてください。 背景色 下 埋める のセクションから無料でダウンロードできます。

3。 次に、をクリックします Ok ボタンをクリックすると、特定の色のすべてのセルが一度に選択され、クリックします ホーム > フォーマット > 非表示と再表示 > 行を非表示、スクリーンショットを参照してください：

4。 次に、特定の色で選択したセルが非表示になります。スクリーンショットを参照してください。

今すぐExcel用の無料ダウンロードKutoolsをクリックしてください！

デモ：Kutools forExcelでセルの色に基づいて行を非表示にする