Macro: select a part of a text and compare it with a part of another text

Hi guys,

a few weeks ago I had a problem with duplication in two lists.
The working macro looks like this:

Please Login or Register  to view this content.

Right now, the macro compares the whole string in the column, and if there is a duplicate, it deletes the whole row. What kind of improvement I need: it compares just a part of the text and if it is equal to a part of another text located in other column and list, delete the whole row.

So an example:
I have email contacts and I need to compare a part of the email address which is after a character "@". So, from a text "[email protected]" I need to take just "centrum.cz" and compare it with another cell, also just the part after a character "@", for example "[email protected]". In this case, the row deletion should come. But in case "[email protected]" and "[email protected]" nothing should happen.

I probably need to modify just the part of the macro mentioned bellow, but I have no idea how to do that.

Please Login or Register  to view this content.

I hope you guys understand me :-)

Thanks a lot for your ideas.

Nobody knows? Or nobody understands? :-)