Writing macros to extract certain data from webpage source

[Rolexs]

I have a list of webpage links from the same website in column A:A.


Each link (webapge) consists of one embedded video.


I would like to extract the embedded link for each of the webpages in column B:B.


Basically I need to open bunch of sites, open page source and extract this line:


******** src="https://openload.co/randomvideo" scrolling="no" frameborder="0" width="100%" height="100%" allowfullscreen="true" webkitallowfullscreen="true" mozallowfullscreen="true">*********>