Hi,

I have the below code to delete the rows which have red in them, how do I add for a second color?

    Dim cell As Range, DelRange As Range

    For Each cell In ThisWorkbook.Sheets("QL_TB").Range("A7:A300")
       If cell.Interior.Color = 255 Then
           If DelRange Is Nothing Then
               Set DelRange = cell
           Else
               Set DelRange = Union(DelRange, cell)
           End If
       End If
    Next cell
Thanks in advance