Leith Ross Wrote:
Hello Barakooda,

Add a standard VBA module to your project and copy and paste the
following code into it.


Code:
--------------------

Public Sub MakeHyperlinks(Optional Link_List As Range)

Dim Hlink As Range
Dim Wks As Worksheet

If Link_List Is Nothing Then
Set Link_List = Selection
End If

Set Wks = Worksheets(Link_List.Parent.Name)

For Each Hlink In Link_List
ActiveSheet.Hyperlinks.Add Anchor:=Wks.Range(Hlink.Address), Address:=Hlink.Value
Next Hlink

End Sub


--------------------


How to call the Macro:
Say your the range you want to convert into hyperlinks is A2 to
A3002.

MakeHyperlinks Range("A2:A3002")

Or you can select the cells you want to convert to hyperlinks and run
the macro from the Macro List. To display the Macro List, press ALT +
F8.

Sincerely,
Leith Ross

Dear Leith Ross,
Thanks for answering, and thanks a lot for elaborting!!
Cheers!!


--
barakooda
------------------------------------------------------------------------
barakooda's Profile: http://www.excelforum.com/member.php...o&userid=34897
View this thread: http://www.excelforum.com/showthread...hreadid=546359