Was this page helpful?
Your feedback about this content is important. Let us know what you think.
Additional feedback?
1500 characters remaining
Export (0) Print
Expand All

SharedWorkspaceFolders Object

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


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

Visual Basic for Applications
    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

Community Additions

© 2015 Microsoft