Hyperlink

[platesigns]

Please refer to the attached and let me know if its possible to make a VB macro which can read each hyperlink on column A and copy the contents of the webpage that will pop and paste in a new excel sheet up i.e. I want to collect the info in one concise excel sheet


Kind Regards

Imtiaz

[playaller]

Example attached below.

Hello. This macro will copy and format the contents to a new sheet for each column B name up to 31 characters. To test, as is, the code will run just the first 3 from sheet 2.

Press ALT+F11 to open VBA window
Right Click your project and press insert new module
Paste the code below and run the macro CopyWebPage

Please Login or Register  to view this content.

When finished testing Change lines near top:

Please Login or Register  to view this content.

to

Please Login or Register  to view this content.

as right now it will just process 3 websites. The new change will process every link in Colun A on sheet 2

[playaller]

I do apologize I realized I uploaded the wrong file format. The macro-enabled file containing the code is attached.

[platesigns]

hi

this is awesome -
now how would I collate them into one sheet i.e. one website info in column A, next column B etc
but there is on complication - every row must be the same i.e. if trading name is in row 7 all must be in row 7

[playaller]

Thank you. I have updated the attached file. For the most part the categories will align but some columns will misaligned due to the category Grade having multiple rows and being different for certain people I would probably have to process near 50 to 100 web pages to compare and adjust for alignment but I don't really have free time for that so I hope this get's you close enough.


By default it's set to process the first 20. If you're satisfied switched the notated lines and all will be processed.

[platesigns]

hi

unbelievable

thanks alot

[playaller]

You're more than welcome. Glad I could help! If satisfied remember to mark the thread as solved.

[platesigns]

Hi Shelton

I am running the macro but after about 300 loops, it gives a run time error
any idea what could be causing this problem

Kind Regards

Imtiaz

[platesigns]

Hi

For each column I need to search for string " E-Mail Address: " and copy the email in the row below this string to a new sheet and list it one below the other

sample file attached

Please help

[playaller]

You can use the below macro but in the future you will have to start a new thread.

Please Login or Register  to view this content.