Filter by Cell Color

[bino1121]

Trying to auto filter sheet2 by color for cells with no fill then change the color of the filtered cells with no fill to green range for sheet 2 column A is variable so it needs to incorporate an xlDown/up so that if the range changes it'll still select all the values.

 

[OaklandJim]

Others may be able to understand the scope of your request but without knowing more I cannot assist. Consider posting a link to your workbook so someone willing to assist does not have to create a fake one to work with. Use the link icon at the top of the message area.

 

[kevin9999]

Best if you could post your sheet using the XL2BB - Excel Range to BBCode. However, see if this does what you want:

Option Explicit
Sub bino1121()
    Application.ScreenUpdating = False
    Dim ws As Worksheet, r As Range
    Set ws = Worksheets("Sheet2")
    Set r = ws.Range("A1:A" & ws.Cells(Rows.Count, "A").End(xlUp).Row)
    
    With r
        .AutoFilter 1, Operator:=xlFilterNoFill
        .Offset(1).Resize(.Rows.Count - 1).Interior.Color = vbGreen
        .AutoFilter
    End With
    Application.ScreenUpdating = True
End Sub