SharedWorkspaceLinks Object (Office)
A collection of the SharedWorkspaceLink objects in the current shared workspace.
Note
Beginning with Microsoft Office 2010, this object or member has been deprecated and should not be used.
Example
Use the Links property of the SharedWorkspace object to return a SharedWorkspaceLinks collection.
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