» Extracting a URL from an excel cell

Extracting a URL from an excel cell

Filed under Programming

This macro will allow you to extract a url/mailto from excel and place it into the next cell.
To see more options: Click here

CODE:

Sub ExtractHL()
Dim HL As Hyperlink
For Each HL In ActiveSheet.Hyperlinks
HL.Range.Offset(0, 1).Value = HL.Address
Next
End Sub

Posted by sp on Saturday, May 2nd, 2009

You can follow any responses to this entry through the magic of "RSS 2.0" and leave a trackback from your own site.