SharedWorkspaceLinks object (Office)
A collection of the SharedWorkspaceLink objects in the current shared workspace.
Beginning with Microsoft Office 2010, this object or member has been deprecated and should not be used.
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
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.