Copy row from one sheet and paste to another if a key word is found in 1 column of sheet 1

Hi everyone, my first post.
I have 10 worksheets in my workbook. The two that I'm concerned with in this post are "Main" and "Completed".
If Column AA in "Main" contains the word "Complete" (which is from a drop down list) I want to copy the entire row from "Main" and paste in the "Complete" sheet without over-writting previous pasted rows.
Back in sheet "Main" I want the data in that row to be cleared with the exception of Column A as it contains a formula for sorting blanks. If I delete that row it will mess up my links on other sheets.
Anyone?

Ok in the attached file it has four sheets, Main(Before),Completed(Before), Main(After), Completed(After)
On Main(Before) rows, 3 and 8 have been marked "Complete" in Column AA
On Complete(After)these two rows are now pasted in rows 2 & 3. (upon running a working macro)
Now on Main(After)rows 3 & 8 data is empty except column A which value has changed from a 2 to a 1. When I sort any blanks rows (value 1) will go to the bottom. Column A is normally hidden.

Here is the code that I have so far:

Please Login or Register  to view this content.

Thanks patel45, can it be changed so when the data from the Complete Sheet is cut, the info in Col A of the complete sheet stays?

Killdozer

What I mean is right now the data in the row with the key word "Complete" from the Main sheet is cut and pasted to the completed sheet. Instead of cutting the whole row can only the range B:AG be cut after the range A:AG is copied to the Complete Sheet?

Excellent, does exactly what I want.
Thanks a bunch patel45
Problem Solved.

Killdozer

Thanks Winon, now my sort still works.

Graderbelly
Solved

Done thanks again