vba - MS Outlook 2010 .SenderEmailAddress 返回一大串字符

Question

我已经搜索并搜索了答案，所以我会在这里发布。我正在尝试创建一个宏，它将 2 周前的邮件从我的收件箱移动到我为每个同事创建的特定文件夹中。该宏成功循环所有超过两周的收件箱消息。但是，当我使用.SenderEmailAddress它时，它会返回一个巨大的字符串而不是###@####.com。如何获取发件人的电子邮件地址？

在没有给出确切字符串（安全问题）的情况下，这是我用“X”代替某些字符得到的结果：

/o=XXXXXXX/ou=Exchange Administrative Group (XXXXXXXXXXXXXXX)/cn=Recipients/cn=XXXXX@XXXXX

字符串末尾是主题行文本。

任何帮助将不胜感激！:-)

Answer 1

这是一个完全有效的 EX 类型地址（与 SMTP 不同）。

尝试使用 MailItem.Sender.GetExchangeUser().PrimarySmtpAddress。

如果发件人不是 Exchange 用户或无法检索到地址，您当然需要检查空值/错误。

Answer 2

此 MSDN 文档将有所帮助。