ExchangeUser-Objekt (Outlook)

Stellt detaillierte Informationen zu einem AddressEntry-Objekt bereit, das einen Microsoft Exchange-Postfachbenutzer darstellt.

HinwBemerkungeneise

ExchangeUser wird vom AddressEntry-Objekt abgeleitet und wird anstelle eines AddressEntry-Objekts zurückgegeben, wenn der Aufrufer eine Abfrageschnittstelle für das AddressEntry-Objekt ausführt.

Dieses Objekt bietet erstklassigen Zugriff auf Eigenschaften, die für Exchange-Benutzer wie FirstName, JobTitle, LastName und OfficeLocation gelten. Sie können auch auf andere Eigenschaften zugreifen, die für den Exchange-Benutzer spezifisch sind und nicht im Objektmodell über das PropertyAccessor-Objekt verfügbar gemacht werden. Beachten Sie, dass einige der expliziten integrierten Eigenschaften Lese-/Schreibeigenschaften sind. Durch Festlegen dieser Eigenschaften muss der Code unter einem geeigneten Exchange-Administratorkonto ausgeführt werden; ohne ausreichende Berechtigungen führt Aufrufen der ExchangeUser.Update -Methode einen Fehler "Berechtigung verweigert".

Beispiel

Im folgenden Codebeispiel wird die Vorgehensweise zum Erhalten der Geschäftsrufnummer, des Bürostandorts und der Position für alle Einträge in der globalen Exchange-Adressenliste gezeigt.

Sub DemoAE() 
 
 Dim colAL As Outlook.AddressLists 
 
 Dim oAL As Outlook.AddressList 
 
 Dim colAE As Outlook.AddressEntries 
 
 Dim oAE As Outlook.AddressEntry 
 
 Dim oExUser As Outlook.ExchangeUser 
 
 Set colAL = Application.Session.AddressLists 
 
 For Each oAL In colAL 
 
 'Address list is an Exchange Global Address List 
 
 If oAL.AddressListType = olExchangeGlobalAddressList Then 
 
 Set colAE = oAL.AddressEntries 
 
 For Each oAE In colAE 
 
 If oAE.AddressEntryUserType = _ 
 
 olExchangeUserAddressEntry Then 
 
 Set oExUser = oAE.GetExchangeUser 
 
 Debug.Print(oExUser.JobTitle) 
 
 Debug.Print(oExUser.OfficeLocation) 
 
 Debug.Print(oExUser.BusinessTelephoneNumber) 
 
 End If 
 
 Next 
 
 End If 
 
 Next 
 
End Sub

Methoden

Name
Delete
Details
GetContact
GetDirectReports
GetExchangeDistributionList
GetExchangeUser
GetExchangeUserManager
GetFreeBusy
GetMemberOfList
GetPicture
Update
GetUnifiedGroup
GetUnifiedGroupFromStore
IsUnifiedGroup

Eigenschaften

Name
Address
AddressEntryUserType
Alias
Anwendung
AssistantName
BusinessTelephoneNumber
City
Klasse
Comments
CompanyName
Department
DisplayType
FirstName
ID
JobTitle
LastName
MobileTelephoneNumber
Name
OfficeLocation
Parent
PostalCode
PrimarySmtpAddress
PropertyAccessor
Session
StateOrProvince
StreetAddress
Typ
YomiCompanyName
YomiDepartment
YomiDisplayName
YomiFirstName
YomiLastName

Siehe auch

ExchangeUser-ObjektelementeOutlook-Objektmodellreferenz

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.