Delete duplicate cells in row, row by row

[HowdeeDoodee]

Want to delete duplicate cells in each row

I have rows of data with duplicate cells in each row. I do not want to delete any rows. I want to delete only duplicate cells in each row.

For example, I now have in one row...

fox, sheep, goat, fox, dog, cat, fox

I want to delete the duplicate cells in each row. I want to end up with the following...

fox, sheep, goat, dog, cat

I have over 25,000 rows and over 200 columns.

Thank you in advance for any replies.

 

[santi91]

Re: SOLVED - Want to delete duplicate cells in row, row by row

Hi, i have the same problem.
But with this code, if a row doesn't have any record, the macro is stopped and i have to re-start macro manually.
Could you write me the same macro without this problem? thank you very much

Otherwise i need a function that allow macro to run in a range of row between 1 and 28581, thanks again.