Convert Hyperlink into URL

[Guest]

hey guys... I have a long single-column sheet of url’s which are displayed as
“friendly_name†hyperlinks (blue & underlined)… what I need are the
“link_location†url addresses instead… I tried “copy†then “paste specialâ€
but no luck… and the command “remove hyperlink†simply converts the hyperlink
into text and loses the url all together… any ideas? Thanks!

 

[Guest]

Try this tiny UDF:

Function hyp2(r As Range) As String
hyp2 = r.Hyperlinks(1).Address
End Function

 

[Guest]

well, after figuring out what a UDF was and how to create one, the damn
thing worked... you rock... thanks man!

 

[Guest]

You are very welcome.
--
Gary''s Student

well, after figuring out what a UDF was and how to create one, the damn
thing worked... you rock... thanks man!