Freigeben über

SharedWorkspaceMember.DomainName-Eigenschaft (Office)

  • Artikel

Ruft die Domäne und den Benutzernamen des angegebenen SharedWorkspaceMember-Objekts im Format Domäne\Benutzer ab. Schreibgeschützt.

Hinweis

Ab Microsoft Office 2010 ist dieses Objekt oder Element veraltet und sollte nicht verwendet werden.

Syntax

Ausdruck. DomainName

Ausdruck Eine Variable, die ein SharedWorkspaceMember-Objekt darstellt.

Beispiel

Im folgenden Beispiel wird der Domänenname aus der DomainName-Eigenschaft jedes freigegebenen Arbeitsbereichsmitglieds extrahiert und mitglieder aufgelistet, die der "MyCompany" Domäne angehören.

 Dim swsMember As Office.SharedWorkspaceMember 
 Dim strDomain As String 
 Dim strMemberList As String 
 For Each swsMember In ActiveWorkbook.SharedWorkspace.Members 
 strDomain = UCase(Left(swsMember.DomainName, _ 
 InStr(swsMember.DomainName, "\") - 1)) 
 If strDomain = "MYCOMPANY" Then 
 strMemberList = strMemberList & swsMember.Name & vbCrLf 
 End If 
 Next 
 MsgBox strMemberList, vbInformation + vbOKOnly, _ 
 "Members in the MYCOMPANY Domain" 
 Set swsMember = Nothing

Siehe auch

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.