If you're adding the formula manually, you could just copy that range and
paste|special values.



"Spork Rhonewood <" wrote:

First of all let me say that I am very now to all of this. I can barely
sort. Ok I have a column of hyperlinks of which I need the addresses,
so that I can transfer the data into Access. I managed to get this
function to work:

Function LinkAddress(cell As Range)
'Lists the Hyperlink Address for a Given Cell
If (cell.Range("A1").Hyperlinks.Count < 1) Then
On Error Resume Next
LinkAddress = cell.Text
Else
LinkAddress = cell.Range("A1").Hyperlinks(1).Address
End If
End Function

Unfortunately when I make a bunch of cells with this in it, I can't
transfer the data anywhere because the formulas get transfered and not
the values(the addresses). Can I make a macro that will go down the
column, run this function, and then place the value it gets in the next
column to the right? That sounds pretty straight forward I just have
no idea how to do it. Advice please.
-Spork

Ps. this was just answered in the thread titled "To Tom" but I could
not understand how to take that spefic solution and apply it to my
problem. : (

---
Message posted from http://www.ExcelForum.com/

--

Dave Peterson