Exporting Hyperlink Destinations to csv

[barryhunter]

I have a spreadsheet that contains Hyperlinks in a perticular column.
would like to be able to export the destination of these hyperlinks t
a csv file.

These hyperlinks have been pasted from IE as links to webpages, (ie no
created with the HYPERLINK function)

I think basically looking for a reverse hyperlink function that ca
read the link_location and ideally the friendly_name, and output thes
to seperate columns.

I cant find any way to access it via VB script either.

Does anybody know how to do this, or have come up with a workaround fo
this problem?

thanks

Barr

 

[Frank Kabel]

Hi
see:
http://www.mvps.org/dmcritchie/excel/buildtoc.htm
in the middle of this page

 

[barryhunter]

Thank you Frank, that helped point me in the right direction.

For anybody else looking for a solution this is the function i came u
with:


Code
-------------------
Private Function GetHyperlink(thecell) As String
If thecell.Hyperlinks.Count > 0 Then
GetHyperlink = thecell.Hyperlinks(1).Address
End If
End Functio
-------------------


It aint pretty but it works for me

Barr