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