hyperlink address

[Guest]

sI would like to take the hyperlink address from one cell that has a
hyperlink associated with it and paste the hyperlink address as a string into
another cell. In otherwords if cell A1 has a hyperlink assigned to it of
http://googgle.com, then paste that as a string in cell B2. Is this possible?

 

[Chip Pearson]

Try

With Range("A1")
If .Hyperlinks.Count > 0 Then
Range("b1").Value = .Text
End If
End With


--
Cordially,
Chip Pearson
Microsoft MVP - Excel, 10 Years
Pearson Software Consulting
www.cpearson.com
(email on the web site)