你里面的Fail是单元格里面类容的全部吗或者Fail只是一部分?
如果是这样可以使用 VBA制作
第一步:去掉所有带Fail的行.
第二步:去掉重复行.
数据在A列,关键字Fail在B列,如下代码去除A列重复,去除B列包含Fail:
~~~~~~~~~~~~~~~~
Sub ChekingKeyWordsAndKeepOnly()
Dim i, j
i = 1
While Cells(i, 1) <> ""
For j = 1 To 10
If LCase(Cells(i, j).Value) = LCase("FAIL") Then
Rows(i).Delete
Exit For
End If
If j = 10 Then
i = i + 1
End If
Next j
Wend
i = 1
While Cells(i, 1) <> ""
j = i + 1
While Cells(j, 1) <> ""
If Cells(j, 1).Value = Cells(i, 1).Value Then
Cells(j, 1).Delete
Else
j = j + 1
End If
Wend
i = i + 1
Wend
End Sub