VBA to compare two Files and Delete duplicate

[shiva_reshs]

Team,

Need help here to understand the way how to do it.

1. I have two files.
2. Both files has data in it.
3. I am trying to compare each line and delete the duplicate in File 2.
4. Save the File 2 as fresh file in same folder.

I tried to use Concatenate to get the data in single column, and do a Vloop up in file 2. But doing so, if there is 2 rows for same ID, then in vlook up it picks up the first record. Making loop hole in the method.

Any other possible for to get this done?

Thanks,

[banaanas]

Should be quite simple with VBA. Please attach both workbooks so we can take a look.

[shiva_reshs]

Thanks for helping out.

Attached sample file.

[banaanas]

The two files are not identical. A few follow up questions:

-What columns are the ones that you wan't to compare? As in what columns need to have the same data in both files for your needs to be considered equal rows?
-Do you wan't to delete ALL matching rows, or only the first one?
-Of the files you provided, wich one is the one where the deletion should happen?

[shiva_reshs]

Hi Banaanas,

Thank you for response.

-What columns are the ones that you wan't to compare? As in what columns need to have the same data in both files for your needs to be considered equal rows?
>> Last Entry File > Column B, C , D, E , F , G

Against the File of Last month file in column B, C, J, K, L, M


-Do you wan't to delete ALL matching rows, or only the first one?

- All matching row.


-Of the files you provided, wich one is the one where the deletion should happen?
- Late Entry file.

Background : I run a report to publish the leave report for my team on XX days in the morning. But possible that, later in the day team has applied for leave or adjustment has been done. So on the next month when I run the report, I validate to check on the last date if any additional leaves were applied that were not in the original report that I ran in the morning(Last month report)

Thank you so much for the assistance.

[shiva_reshs]

Any luck on getting onto the result sir?
I am still trying to fiddle by brain to know how to put logic.

[shiva_reshs]

If any one came across this post, I solved this with below method.

1) used concatenate to joing the column in both sheet

2) used Formula ""=IF(ISERROR(MATCH(RC[-1],'[" & x.Name & "]Sheet1'!C17,0)),"""",RC[-1])"" to find the duplicate in 2nd sheet.

3) Once duplicate found, removed the record