Note
Access to this page requires authorization. You can try signing in or changing directories.
Access to this page requires authorization. You can try changing directories.
Gets a SharedWorkspaceFolders collection that represents the list of subfolders in the document library associated with the current shared workspace. Read-only.
Note
Beginning with Microsoft Office 2010, this object or member has been deprecated and should not be used.
Syntax
expression.Folders
expression A variable that represents a SharedWorkspace object.
Remarks
The SharedWorkspaceFolders collection does not include the root document library folder itself, which by default is named "Shared Documents".
Example
The following example lists the subfolders in the current shared workspace.
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.