View Full Version : [SOLVED:] Macro to extract url from hyperlink and populate the url in the cell below?
gringo287
08-30-2012, 09:31 AM
hi,
Although this may sound like an unusual request, the title should pretty much say it all. My ultimate end goal is to decontruct a pre populated list of hyperlinks to show the original url underneath the hyperlink.
gringo287
08-30-2012, 10:01 AM
ok, ive managed to find what i was looking for, for the fist part of my query. My problem now is that i need to adjust the urls to change them to internet explorer pop out urls. ive i know exactly how to change the url manually to do this:-
http://www.youtube.com/watch?v=bSrCBjLmt4s&feature=g-vrec
http://www.youtube.com/watch_popup?v=bSrCBjLmt4s&vq=medium (http://www.youtube.com/watch_popup?v=bSrCBjLmt4s&vq=medium)
but, annoyingly, find and replace doesnt work and just opens up the window in its normal state.
any ideas:dunno
Sub ExtractHL()
Dim HL As Hyperlink
For Each HL In ActiveSheet.Hyperlinks
HL.Range.Offset(0, 1).Value = HL.Address
Next
End Sub
gringo287
08-30-2012, 10:07 AM
never mind...
note to self... stop relying on forums too easilly before double checking i cant sort it myself.
:whistle: :whistle: :whistle: :whistle: :whistle: :whistle:
Powered by vBulletin® Version 4.2.5 Copyright © 2024 vBulletin Solutions Inc. All rights reserved.