How do I display the link location of a hyperlink?

[Relic426]

I have an excel application that queries a web site and downloads certain
tables as html.. The tables contain hyperlinks, the location of which you
can view if you mouse over them and by clicking on the cell, you can also
follow these links.

But what is actually displayed in the cell is the "friendly name". For
future programming, I would like the actual link location displayed (either
in these cells or different cells)... Does anyone know a way to do that?

I've tried edit query, but excel vba learn doesn't record the link location??

 

[Gary''s Student]

Here is a one-liner:

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

 

[Shailesh Shah]

See VBA help for Hyperlink.

e.g. Range("A1").Hyperlinks(1).Address


Regards,
Shah Shailesh
http://in.geocities.com/shahshaileshs/
(Excel Add-ins Page)

*** Sent via Developersdex http://www.developersdex.com ***

 

[Relic426]

Thank you so much... works like a charm... I had no idea.

 

[Gary''s Student]

You are very welcome.
--
Gary's Student

Thank you so much... works like a charm... I had no idea.