close
I am importing data from a webpage and it contains hyperlinks. I am
attempting to extract the hyperlink, but not all of it is being
extracted. It stops at a single quote (').
I am pulling the address with the following function:
Public Function ShowAddress(rng As Range) As String
If rng.Cells.count gt; 1 Then
ShowAddress = CVErr(xlErrValue)
Else
ShowAddress = rng.Hyperlinks(1).Address
End If
End Function
The embedded link is this:
javascriptpenWindow2('#ccffcc:console:10-May-06:07.07:20.02:2006_TL021:130:ACP:vecld=sevenof9 atcads')
But the function, and other similar functions return this:
javascriptpenWindow2('
Any ideas as to how I can extract the complete link?
Thanks,
Mike
全站熱搜
留言列表
