View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
arne arne is offline
external usenet poster
 
Posts: 5
Default hyperlink formula to its result in same cell

I'm stucked; what am I doing wrong?

problem, get rid of the hyperlink formula and have the name in A show,
'and the link to open when activate1
Arne

Sub make_hyperlink()
' Sheet filled with names in A col and their belonging url in B col
' create a hyperlink with the name (A)AND url from (B) in col C
' And remove the formula Hyperlink, but keep the result in C
'Example in COL
'A: Google
'B: http://www.google.com/
'C: gives Google with hyperlink

Dim myrow As Long
With ActiveSheet
myrow = Range("A" & Rows.Count).End(xlUp).Row
Range("C1:C" & myrow).Formula
="=trim(HYPERLINK(RC[-1],RC[-2]))"
End With
End Sub