thanks for the guidance. i actually wound up trying this out instead and
it worked pretty quick:


Code:
--------------------

Dim lastRow2
lastRow2 = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell) .Row

For Q = 1 To lastRow
If Range("N" & Q).Value = 0 And Range("Y" & Q).Value <= 1 Then
Range("N" & Q).EntireRow.Cut Destination:=Sheets("DO NOT USE").Range("A" & Sheets("DO NOT USE").Rows.Count).End(xlUp).Offset(1, 0)
End If
Next Q

--------------------


--
drdavidge
------------------------------------------------------------------------
drdavidge's Profile: http://www.excelforum.com/member.php...o&userid=36168
View this thread: http://www.excelforum.com/showthread...hreadid=561608