M
mhvoth
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 > 1 Then
ShowAddress = CVErr(xlErrValue)
Else
ShowAddress = rng.Hyperlinks(1).Address
End If
End Function
The embedded link is this:
javascript
penWindow2('#ccffcc:console:10-May-06:07.07:20.02:2006_TL021:130:ACP:vecld=sevenof9atcads')
But the function, and other similar functions return this:
javascriptpenWindow2('
Any ideas as to how I can extract the complete link?
Thanks,
Mike
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 > 1 Then
ShowAddress = CVErr(xlErrValue)
Else
ShowAddress = rng.Hyperlinks(1).Address
End If
End Function
The embedded link is this:
javascript
penWindow2('#ccffcc:console:10-May-06:07.07:20.02:2006_TL021:130:ACP:vecld=sevenof9atcads')But the function, and other similar functions return this:
javascript
penWindow2('Any ideas as to how I can extract the complete link?
Thanks,
Mike