hmm.. i managed to change it to:


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

'Cut out rows
Sheets("ReArranged - No Formulas").Select
For Each rng In Range("N:N")
If rng.Value = 0 And rng.Offset(0, 11).Value <= 1 Then
rng.EntireRow.Cut Destination:=Sheets("DO NOT USE").Range("A" & Sheets("DO NOT USE").Rows.Count).End(xlUp).Offset(1, 0)
End If
Next rng

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


but this seems like it is taking way too long. is there a faster way to
do something similiar?


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