How to convert web addresses into hyperlinks

  • Thread starter Thread starter NeilPSargent
  • Start date Start date
N

NeilPSargent

Hello Everyone,

Can anyone help me find a solution to the following problem:

I have a spreadsheet with a single column of hundreds of normal text web
addresses (i.e. http://www.microsoft.com).

Is there an easy way (a macro??) that will take each address in each cell
and convert it into an actual hyperlink?

I know I could do it individually, but with the number of addresses we have
it would take forever.

Thanks very, very, much.

-neil
 
Test this one for column A

Sub test()
For Each myCell In Columns("A").Cells.SpecialCells(xlCellTypeConstants)
ActiveSheet.Hyperlinks.Add Anchor:=myCell, _
Address:=myCell.Value, TextToDisplay:=myCell.Value
Next
End Sub
 
Back
Top