SharedWorkspaceLinks Object (Office)

A collection of the SharedWorkspaceLink objects in the current shared workspace.

Note Note

Beginning with Microsoft Office 2010, this object or member has been deprecated and should not be used.

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 

Show:
© 2014 Microsoft