Delete an entire row if two cells......
Sub DeleteRows_2Params()
'Bob Phillips Aug. 26, 2006
'Revised Gord Dibben April 30, 2008
Dim iLastRow As Long
Dim i As Long
iLastRow = Cells(Rows.Count, "B").End(xlUp).Row
For i = iLastRow To 1 Step -1
If Cells(i, "B").Value = "N" And _
Cells(i, "C").Value = "N" Then
Rows(i).Delete
End If
Next i
End Sub
Gord Dibben MS Excel MVP
On Wed, 30 Apr 2008 07:48:00 -0700, Red2003XLT
wrote:
Hello All,
How do I delete (for an entire worksheet) rows that contain "N"?
The cells are "B and "C".
If "B" and "C" contain the letter "N" delete the entire row?
The letter "N" is the only thing in the cell.
|