outlook - 我可以访问 VBA 中的 Outlook 电子邮件联系人字段吗？

Question

我想在 Outlook 中访问电子邮件(电子邮件选项)上的联系人字段。通常，此字段将电子邮件与联系人联系起来。由于它是选项对话框中可用的自由格式文本字段，因此我尝试使用它来为我的电子邮件存储“下一步操作”。我想根据主题设置下一个操作，但我不知道如何从 outlook.mailitem 对象访问该字段

谢谢
吉姆

Answer 1

我认为这会回答这个问题:该字段被埋在半通用的“链接”属性中，具有 olContact 类型。要测试以下代码，请打开一封新电子邮件，在联系人字段中输入一些内容，然后运行代码:

Sub ShowContactsField()
  Dim objApp As Outlook.Application
  Dim ActiveMailItem As Inspector
  Dim currLink As Link


Set objApp = CreateObject("Outlook.Application")
  If TypeName(objApp.ActiveWindow) = "Inspector" Then
    If objApp.ActiveInspector.CurrentItem.Class = olMail Then
      For Each currLink In objApp.ActiveInspector.CurrentItem.Links
        If currLink.Type = olContact Then
          MsgBox currLink.Name
        End If
      Next
    End If
  End If
  Set objApp = Nothing
End Sub

总的来说，我同意奥利弗的观点；这可能不是存储您要查找的内容的最佳位置，但至少它以 native 形式公开。检查字段长度，我认为它可能限制为 255。