你不能在Outlook对象模型中这样做--你可以循环遍历所有GAL条目，但是这太慢了，而且对于大型GAL容器会失败（正如你所注意到的）。
在Extended MAPI（C++或 Delphi ）中，您可以创建PR_ANR限制，以获取给定地址簿容器中的所有匹配项-这是Outlook用于显示不明确条目列表的方式。
如果可以选择使用Redemption（我是它的作者），你可以使用RDOSession.AddressBook.GAL.ResolveNameEx来返回一个匹配列表：

set rSession = CreateObject("Redemption.RDOSession")
  rSession.MAPIOBJECT = Application.Session.MAPIOBJECT
  set AdrrEntries = rSession.AddressBook.GAL.ResolveNameEx("joe")
  Debug.Print AdrrEntries.Count & " names were returned by ResolveNameEx:"
  Debug.Print "------------"
  for each AE in AdrrEntries
    Debug.Print AE.Name
  next
  Debug.Print "------------"