Copy Specific Rows of Data Based On two Values

help us attaching a samplefile (not 55.000 rows)

Hi, timbo1957,

if itīs just customer you coud make good use of the Autofilter in Column I in Sheet "Download" and only copy the visible cells to Sheet "De Dupe". On the latter you could apply the Advanced Filter to show Uniques.

Or use the Advanced Filter with Headings, a criteria range and output range on Sheet De Dupe and copy only those records.

If you go by VBA I would apply either of the two methods as basic. Depending on the number of records you may as well use a loop for transporting data and checking the 13 digit number from the start of the area to the actual row (if WorksheetFunction.CountIf(Range/"I":I" & lngCounter, "Range("I" & lngCounter).Value) = 1 copy, else skip).

Ciao,
Holger

Hi, timbo1957,

have a look at the workbook. I added a new sheet (Criteria) as well as some code (the range for the criteria is limited to 1 row/creditor in these codes) and added Customer to the headings:

Please Login or Register  to view this content.

To me Customer1 and Customer 1 are not identical due to the bank.

Ciao,
Holger