Excel 2007 :: Macro - Move Duplicate Rows From One Worksheet To Another

I am using Excel 2007 on Windows 7 Home Premium 64bit.

My Workbook contains 2 Worksheets, both with the same headings in row 1. Sheet2 is initially empty, except for the headings in row 1.

The following is a sample of the data in Sheet1:

[Code] ......

I want to create a Macro to operate as follows:

In the above sample data, rows 2, 4, and 8 are identical, so I want to copy rows 4 and 8 to Sheet2, and delete them from Sheet1.

Similarly:

Rows 3 and 9 are identical, so row 9 should move to Sheet2;
Rows 5 and 11 are identical, so row 11 should move to Sheet2.
Rows 6, 7, 10, and 12 are all unique, so should be unaffected by the Macro.

New records will be added to Sheet1 periodically, so the Macro will be used each time to move any newly discovered duplicates to Sheet2.

The Macro should make no assumption about how the rows are ordered, and should not change their order.

I have uploaded two Workbooks, such that Workbook1 shows the original data, and Workbook2 shows the result I want to obtain.

Attached Files :
Workbook1.xlsm‎
Workbook2.xlsm‎