how do i import a hyperlink to access

[chris]

need to know how to keep my hyperlinks from losing there value and becoming
the decription displayed.

=HYPERLINK("TECH INFO/LT200MY/ ", "LT200MY Shipping Bracket Photos")

becomes

LT200MY Shipping Bracket Photos

 

[John Nurick]

Hi Chris,

Here is a custom worksheet function which converts an Excel hyperlink
into something Access can import into a text field which you can then
convert to a hyperlink field.

Public Function ExpandHyperlink(R As Range, _
Optional AddressOnly As Boolean = False) As Variant

'Converts Excel hyperlink into a string that can be
'imported into an Access text field which can then
'be converted into a hyperlink field.

If R.Hyperlinks.Count > 0 Then
With R.Hyperlinks(1)
ExpandHyperlink = IIf(AddressOnly, .Address, _
.Name & "#" & .Address & "#" & .SubAddress)
End With
Else
ExpandHyperlink = ""
End If
End Function