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