Re. hyperlinks in a spreadsheet

C

Candyman

Hi!

I have been given a database of names, addresses and
website addresses in an Excel spreadsheet. The website
addresses do not appear as a hyperlink. Is there anyway
to Format that row to make all of the addresses appear as
links that I can click on that will then just direct my
browser to that website. This works fine if I input data
from scratch with www as a prefix but not with existing
data.

I am using Office 2003 on Win XP Home.

Please Help as the database is quite considerably large
and business-critical.

Best Wishes
Andy
 
J

jeff

Hi,'

Try this little macro on a TEST sheet to change your
addresses into true hyperlinks. Adjust the Range
to your data. Assumes no http or www at all.

jeff

Private Sub MakeHPRLnks()
Dim c As Range
For Each c In Range("E1:E100")
c = "http://www." & c.Value
c.Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection,
Address:=Selection
Next c
End Sub
 
G

Guest

-----Original Message-----
Hi,'

Try this little macro on a TEST sheet to change your
addresses into true hyperlinks. Adjust the Range
to your data. Assumes no http or www at all.

jeff

Private Sub MakeHPRLnks()
Dim c As Range
For Each c In Range("E1:E100")
c = "http://www." & c.Value
c.Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection,
Address:=Selection
Next c
End Sub
.
Click to expand...
 
Top