Well, you can achieve this task using macro
Add a command button on the sheet from the control box and paste following codes in codes window
Formula:
Private Sub CommandButton1_Click()
Dim row As Integer, col As Integer
row = 1
col = 1
For row = 1 To 10
If Sheet1.Cells(row, col).Interior.Color = 12632256 Then
Exit Sub
ElseIf Sheet1.Cells(row, col).Value = "Y" Or Sheet1.Cells(row, col).Value = "N" Then
Exit Sub
Else
Sheet1.Rows(row).Delete
End If
Next
End Sub
Chris
------
Convert your Excel spreadsheet into an online calculator.
http://www.spreadsheetconverter.com