SharedWorkspaceMember Object

Remarks

Use the SharedWorkspaceMember object to manage users who have rights to participate in a shared workspace and to collaborate on the shared documents saved in the workspace site.

The Role specified when the user is added as a member of the workspace (for example, "Reader" or "Contributor") determines that user's rights in the workspace and cannot be accessed or modified later through properties of the SharedWorkspaceMember object.

Use the Item() property of the SharedWorkspaceMemberscollection to return a specific SharedWorkspaceMemberobject.

Use the SharedWorkspaceMember object's three distinct name properties to retrieve identifying information about the member.

• the Name property returns the members display name;
• the Email property returns the member's e-mail address; and,
• the DomainName property returns the member's domain and user name in the format

  domain\user

  .

Example
The following example displays the number of members in the active document's shared workspace, along with their names, domain user names, and e-mail addresses.

 Dim swsMember As Office.SharedWorkspaceMember Dim strMemberInfo As String strMemberInfo = "The shared workspace contains " & _ ActiveWorkbook.SharedWorkspace.Members.Count & " member(s)." & vbCrLf If ActiveWorkbook.SharedWorkspace.Members.Count > 0 Then For Each swsMember In ActiveWorkbook.SharedWorkspace.Members strMemberInfo = strMemberInfo & swsMember.Name & vbCrLf & _ " - " & swsMember.DomainName & vbCrLf & _ " - " & swsMember.Email & vbCrLf Next End If MsgBox strMemberInfo, vbInformation + vbOKOnly, _ "Members in Shared Workspace" Set swsMember = Nothing 

See also:

• Object Model Reference
• SharedWorkspaceMember Object Members