Works for me:

=GetHyperlinkAddress(B1) on the worksheet.

I put it in a standard module. I've got the Analysis Pack but I don't think
you need it.

Regards

Trevor


"bhilton84" wrote in message
...
I created a UDF but I can't run the function. Do I have to save the
function
under the worksheet or workbook or something else? Also, do I need the
Analysis toolpak - VBA to make the function work. The function is as
follows:

Function GetHyperlinkAddress(Rng As Range) As String
With Rng
If .Hyperlinks.Count 0 Then
GetHyperlinkAddress = .Hyperlinks(1).Address
End If
End With
End Function