SharedWorkspaceFolders object (Office)

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


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


Use the Folders property of the SharedWorkspace object to return a SharedWorkspaceFolders collection.

    Dim swsFolders As Office.SharedWorkspaceFolders 
    Set swsFolders = ActiveWorkbook.SharedWorkspace.Folders 
    MsgBox "There are " & swsFolders.Count & _ 
        " folder(s) in the current shared workspace.", _ 
        vbInformation + vbOKOnly, _ 
        "Collection Information" 
    Set swsFolders = Nothing 

See also

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.