Hi Polb and Gary's,
If there is no hyperlink I think you would get zero
try
Function HyperlinkAddress(cell) As String
If cell.Hyperlinks.Count 0 Then _
HyperlinkAddress = cell.Hyperlinks(1).Address
End Function
to use:
=personal.xls!hyperlinkaddress(A1)
more informiation an variations see
http://www.mvps.org/dmcritchie/excel...perlinkaddress
---
HTH, David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages:
http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page:
http://www.mvps.org/dmcritchie/excel/search.htm
"Gary''s Student" wrote in message
...
If there is a hyperlink in C5, then the UDF
=hyp("C5") will return the URL
Here is the UDF:
Function hyp(r As String) As String
hyp = Range(r).Hyperlinks(1).Address
End Function
--
Gary's Student
"polytx" wrote:
How do I retrieve the url portion of a cell that has a hyperlink stored int
it. The value function only returns the readable text.