Macro to extract data from a URL

Hi

I'm very much in need of some help. I'm trying - with no luck - to write a macro to do some data extraction for me. I have a column (B2:B1686) with URLs from which I would like to extract data to my work sheet.

here is an example of a url: http://ieee-emf.com/viewstudy.cfm?ID=1

What I specifically want to do is in 11 columns, say, from E to O to copy the content of the table in midle of the website.

So that I'll get the values from the table copied to the row corresponding to the specific URL in my worksheet.

the url	ID Number	Study Type	Model	Details	Findings	Status	Principal Investigator	Funding Agency	Country	References	Comments
http://ieee-emf.com/viewstudy.cfm?ID=1	1	In Vivo	some txt	some txt	etc	etc	etc	etc	etc	etc	often empty, but sometimes with some txt
..	..	..	..	..	..	..	..	..	..	..	..

Thanks in advance
Jaco

Not sure if you necessarily need a macro, unless you have tons of websites you're doing this for. Using the Data > From web function I was able to easily populate the attached table, which can be reformatted for your preferences.

Thanks

There are 1685 webside, so doing it manually would take a while + I would like to have the data in a row instead of a column.

I'm currently able to get excel to open the websides on at a time with the InternetExplorer.Application and then .Navigate
I asume I'll have to use the getElementsByTagName to go to the right cells in the url's table, but how to do that at how to get it copied to the different columns in the corresponding Url's row in my data sheet, that I not sure how to do.

Jacob

No one? I would really love to find a solution. What's causing me the most trouble is finding out how to get the code to find the right cells in the table? Since the websites seems to have more than one table.

Wow..
Works like a charm.

Besides solving my problem, this code also gives me something to study and learn from

Thanks a lot!