Match Emails to URLs

[Sharid]

I have a list of emails, I need to link them to the correct URLs. Problem is there are too many to do manual.

I was hoping for some vba code that would MATCH part of the string in the EMAIL to that of the URL and place it in the next column/s

Example
Sheet1 column A has all the urls

URLs
http://www.Whatcar.co.uk
http://www.Autotrader.co.uk
http://www.CarGURU.co.uk
http://www.Automart.co.uk
http://www.MotorWorld.co.uk

<tbody>
</tbody>

Sheet2 Column A has all the Emails

Emails
JohnDoe@whatcar.co.uk
JoeBlogs@MotorMadness.co.uk
JaneBlogs@MotorMadness.co.uk
JaneBlogs@MotorWorld.co.uk
JaneDoe@Whatcar.com
Info@Autotrader.co.uk
JaneDoe@BillysCars.co.uk
Contact@CarGuru.co.uk
Bill@MedicalGuru.co.uk
Jane@LifeStyleGuru.co.uk
Info@Martfury.co.uk
Info@AutoMart.co.uk

<tbody>
</tbody>

When the code is run it will link the Emails from Sheet2 to that of the URLs on Sheet 1. I understand that this may not work 100% correct,however it will link the bulk of the emails.

Some emails may have a simmilar string to that of the url, the second email goes into the next column, I can then look at these few individually.

So it will look like this when the codes is run

URLS
http://www.Whatcar.co.uk	JohnDoe@whatcar.co.uk	JaneDoe@Whatcar.com
http://www.Autotrader.co.uk	Info@Autotrader.co.uk
http://www.CarGURU.co.uk	Contact@CarGuru.co.uk	Bill@MedicalGuru.co.uk	Jane@LifeStyleGuru.co.uk
http://www.Automart.co.uk	Info@AutoMart.co.uk	Info@Martfury.co.uk
http://www.MotorWorld.co.uk	JaneBlogs@MotorWorld.co.uk	JaneBlogs@MotorMadness.co.uk	JoeBlogs@MotorMadness.co.uk

<tbody>
</tbody>

IF POSSIBLE, the closest email MATCH to the url needs to go into column B Sheet1,

Any UNMATCHED EMAILS in Sheet2 are then highlighted in RED. This is because although I might have the URLs some emails are either Gmail, Yahoo, Hotmail etc. I can then look at these one at a time

Thanks

 

[Sharid]

Hi

Can anybody help on this, I am really stuck

Thanks

 

[Sharid]

I think what I am looking for is called a FuzzyFind

I found this URL, I can't get the code to work could someone please take a look at this code in the url as it is way too advanced for me. Thanks

https://www.mrexcel.com/forum/excel...zy-matching-new-version-plus-explanation.html

 

[Sharid]

Hi

I found a possible solution incase someone needs it, I will use this now. Its here in this youtube video https://www.youtube.com/watch?v=BYETxWt8yXE

MS download https://www.microsoft.com/en-us/download/default.aspx