Links Property
Returns a SharedWorkspaceLinks collection that represents the list of links saved in the current shared workspace. Read-only.
expression.Links()
expression Required. An expression that returns a SharedWorkspace object.
Example
The following example lists the links saved in the current shared workspace.
Dim swsLinks As Office.SharedWorkspaceLinks
Set swsLinks = ActiveWorkbook.SharedWorkspace.Links
MsgBox "There are " & swsLinks.Count & _
" link(s) in the current shared workspace.", _
vbInformation + vbOKOnly, _
"Collection Information"
Set swsLinks = Nothing