software

I have a list of various hyperlinks in an excel worksheet (cells a1-a...). I
would like to retreieve the actual addresses of these hyperlinks and display
them next to the addresses in column b (cells b1-b...). Does anyone know if
this is possible. Thank You.

Am I oversimplifying something? How about clicking on each link, which would
take you to the actual address? You could then copy and paste the address
(url or e-mail) back into your spreadsheet.

quot;hartjeztquot; gt; wrote in message
...
gt;I have a list of various hyperlinks in an excel worksheet (cells a1-a...).
gt;I
gt; would like to retreieve the actual addresses of these hyperlinks and
gt; display
gt; them next to the addresses in column b (cells b1-b...). Does anyone know
gt; if
gt; this is possible. Thank You.

Hello hartjezt,

Here is macro to do just that. Add a VBA module to project and copy
this code into it.

Sub ShowAddresses()

Dim HyperLnk

For Each HyperLnk In ActiveSheet.Hyperlinks
HyperLnk.Range.Offset(0, 1).Value = HyperLnk.Address
Next HyperLnk

End Sub

Sincerely,
Leith Ross--
Leith Ross
------------------------------------------------------------------------
Leith Ross's Profile: www.excelforum.com/member.php...oamp;userid=18465
View this thread: www.excelforum.com/showthread...hreadid=504593