Moving rows of data to another sheet with vba

Hello - - I have an excel file that contains about 1000 rows of data, from column A to O. Column C contains either the letter A or the letter I, A means Active, I means Inactive.

What I'd like to do is replace my monthly manual task of moving all the I's to sheet2. When completed, the excel file should have two sheets, all of the A's on one, and the I's in the other. The original excel file is not sorted by column C. The end result should have the same row 1, being the header row.

Any suggested VBA code to get this started would be great! There are some additional steps, to save the file to a specific location but I think I could do that once the excel file is formatted the way I wanted it....

Thanks again for your help....!

Hey all - - Thanks for all your replies, I did however find a workable solution from Ron B.'s site....here it is, a bit longer then other suggestions - - I did add in the save and copy commands at the end:

Please Login or Register  to view this content.

Thanks again...I'm closing this with Solved!!!

Hello ironman,

This macro will search "Sheet1" column "C" for cells with "I" and copy them to "Sheet2". After they are copied, the rows on "Sheet1" will deleted.

Please Login or Register  to view this content.

Hi ironman
Here's another approach using autofilter

Please Login or Register  to view this content.

John

Try this:

Please Login or Register  to view this content.

Good work. It's gratifying to solve issues by ones' self.
John