converting plain text url to http link

S

stef

Excel 2002 SP3
Win XP HE

Hi,

I have a sheet with a column containing on each row a url such as
http://www.mydomain.com

The format of the cells is "General" as that is how the file is provided
to me.

How can I instantly/immediately convert the format so that I can click
the cell with a url and go to the website?

I mean for the whole column at once, etc.

Possible?
 
G

Gord Dibben

Sub MakeHyperlinks()
'David McRitchie
Dim cell As Range
For Each cell In Intersect(Selection, _
Selection.SpecialCells(xlConstants, xlTextValues))
With Worksheets(1)
.Hyperlinks.Add anchor:=cell, _
Address:=cell.Value, _
ScreenTip:=cell.Value, _
TextToDisplay:=cell.Value
End With
Next cell
End Sub


Gord Dibben MS Excel MVP
 
J

Jim Cone

From yesterday in the programming group...

"If your weblinks are written correctly like www.google.co.uk you can change
them First make sure the auto correct for web links, check
tools>autocorrect>auto format as you type>check internet and network paths.
type in a web address in a cell like www.google.co.uk (should change to a
hyperlink), copy this cell and then select your row or column and paste
special>format.
--
John
MOS Master Instructor Office 2000, 2002 & 2003"

--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware





"stef" <stef.bm_at_hotmail.removethis.com> wrote in message
Excel 2002 SP3
Win XP HE
Hi,
I have a sheet with a column containing on each row a url such as
http://www.mydomain.com
The format of the cells is "General" as that is how the file is provided
to me.
How can I instantly/immediately convert the format so that I can click
the cell with a url and go to the website?
I mean for the whole column at once, etc.
Possible?
 
S

stef

Jim said:
From yesterday in the programming group...

"If your weblinks are written correctly like www.google.co.uk you can change
them First make sure the auto correct for web links, check
tools>autocorrect>auto format as you type>check internet and network paths.
type in a web address in a cell like www.google.co.uk (should change to a
hyperlink), copy this cell and then select your row or column and paste
special>format.
Click to expand...

hi, tx for ur reply; but unfortunately it doesn't work.

I mean, once the 1st cell in the top row of column has been converted to
http link, copy paste special the rest of columns only pastes the font
color and the underscore, etc., but does not create an actual http link.....

unless i am missing something, which is always possible......
 
S

stef

Gord said:
Sub MakeHyperlinks()
'David McRitchie
Dim cell As Range
For Each cell In Intersect(Selection, _
Selection.SpecialCells(xlConstants, xlTextValues))
With Worksheets(1)
.Hyperlinks.Add anchor:=cell, _
Address:=cell.Value, _
ScreenTip:=cell.Value, _
TextToDisplay:=cell.Value
End With
Next cell
End Sub


Gord Dibben MS Excel MVP
Click to expand...
I was hoping there would be a simpler way but I'll try that and post
back here.
tx!
 
Top