Question

我使用Excel VBA迭代Outlook GAL。我需要能够访问每个项目的属性

我正在离开以下代码并尝试从AddressEntry访问属性

我尝试使用此代码做了不同的事情，但我还没有弄清楚如何了解每个条目的详细信息。

Private Sub GetAddresses()

    Dim o, AddressList, AddressEntry
    Set o = CreateObject("Outlook.Application")
    Set AddressList = o.Session.AddressLists("Global Address List")
    For Each AddressEntry In AddressList.AddressEntries
        . . .
    Next AddressEntry

End Sub

我需要访问属性并提取信息并将其传递给Excel工作表：

我会发布一张图片，但没有代表。

如果我从GAL中选择一个项目并右键单击并选择属性，那就是我要检索的信息。

Last Name,
First Name, 
Alias, 
etc.

如何使用Excel VBA访问它？

Answer 1

调用AddressEntry.GetExchangeUser以检索ExchangeUser对象：http://msdn.microsoft.com/en-us/library/office/dn320297(v=office.15).aspx

如何为每个条目访问Outlook GAL属性

1 个答案: