How to convert web addresses into hyperlinks

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
 
R

Ron de Bruin

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
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top