Filter by background color?

[Dorothychin]

Is it possible to filter a column by background color? Eg. there are certain rows in column A are background colored in yellow, is it possible to view only the yellow cell in column A?

 

[JV0710]

Filter by background colour

Hi

If you have conditional formatting for the background colour, then you can filter on the same conditions

Hope this helps

 

[Krishnakumar]

Hi,

Sub FilterByColor()
Dim r As Range, txt As String
Dim fColor  As Byte

fColor = Range("B1").Interior.ColorIndex
Columns(1).Rows.Hidden = False

Again:
    For Each r In Range("a2", Range("a" & Rows.Count).End(xlUp)).SpecialCells(xlCellTypeVisible)
        If r.Interior.ColorIndex <> fColor Then txt = txt & r.Address(0, 0) & ","
        If Len(txt) > 245 Then
            Range(Left(txt, Len(txt) - 1)).EntireRow.Hidden = True
            txt = Empty: GoTo Again
        End If
    Next
If Len(txt) Then Range(Left(txt, Len(txt) - 1)).EntireRow.Hidden = True
End Sub

Fill the filter color in b1 and run the macro.

Thanks to jindon.