Macro to clear row data then shift remaining data up to empty rows.

Tried searching for this but not sure if it was ever attempted. I'm looking for advice on the following: I'd like to have a sheet with multiple columns of data (say A thru K for instance.). Id like to reserve column A for ONLY imputing an X. The rest of the columns b-K would have data in the cells. I'd like to have a macro that when it saw an X in column A, would copy all of the data in cells B-K in that row, paste it into the next empty row of a second sheet (for history tracking), then go back to the original sheet and continue looking for additional "X"'s and repeat. Once all of the X's were copied, it would "clear" (Not delete because some of the cells would have formulas in them that would need to remain for future use.) the cells based on the "X" then finally move all of the remaining data up to the empty rows to fill in the empty rows. This last piece would be more for esthetics to have a clean looking sheet. Does anyone have any ideas on this that they could share?

Try this...

1) It copies all "x" rows to Sheet2
2) It deletes all "x" rows from Sheet1

Please Login or Register  to view this content.