Move Row based off criteria in Excel

:confused: Hello All,

What I am trying to do is if on the (Open Project Issues) tab column F says "Closed" it will move that row to a tab called (Closed Project Issues) tab. I was trying something like this:

Code:

---


Sub testmove()
Dim c As Long
For c = ActiveSheet.UsedRange.Rows.Count To 2 Step -5
    If Cells(c, 6) = "Closed"
Rows(c).Cut
End If
Next c

End With
'find last row
LastRow = Cells.Find("*", LookIn:=xlValues, SearchDirection:=xlPrevious).Row

???????? ok I'm lost..

---

I wanted it to find the last row on the closed tab and insert copied cells

Please help..

Any Ideas???

Thanks

Thread Moved

You should exit the loop after its found as you dont want to be doing multiple cuts ;)