View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Ronald (Gmail) Ronald (Gmail) is offline
external usenet poster
 
Posts: 2
Default display text from a link

Hi all,

trough this forum I resolve the issue how to make a link from text lines

with a macro.

Example: the data loaded from a text file was

COLUMN A COLUMN B
www.microsoft.com link to microsoft
www.playboy.com nice pictures
www.google.com search engine

with the following macro the text in column A was set to link so
klicking on it will open the browser and open the displayed addres.
First selecting the wanted cells.
---------------------------------------
Sub AddHperLinks()
Dim cl As Range

For Each cl In Selection.Cells
ActiveSheet.Hyperlinks.Add Anchor:=c1, Address:=CStr("http://" &
cl.Value)

Next cl
---------------------------------------

What I need now is that the the text on column B changed in a link so
that klickin on it will bring me to the address as mentioned in column A
.. I intended t o delete column A after everithing is changed.
Using TextToDisplay may be a solution but I don't know how to place it
and make it working when loading the above example.

Appreciate any help !!

Best regards,

Ronald.