VBA Outlook 传入项目类

【问题标题】：VBA Outlook Incoming Items classVBA Outlook 传入项目类
【发布时间】：2015-04-17 15:57:39
【问题描述】：

我使用Items_add 事件编写了一个代码来管理传入的邮件。我最近发现召回消息和自动回复（不在办公室）不是邮件，因为我的代码不会处理它们。

我尝试用谷歌搜索，但找不到答案。

那么，我怎样才能获得收到的召回项目和到达收件箱的自动回复？

【问题讨论】：

【解决方案1】：

为什么不检查它是什么？选择收件箱中的项目，然后运行如下所示的一小段代码，它会返回并告诉您它是召回消息的报告项目。

    Dim objSelection As Outlook.Selection
Set objSelection = Outlook.Application.ActiveExplorer.Selection

MsgBox TypeName(objSelection.Item(1))
Set objSelection = Nothing

【讨论】：

或者您可以使用 OutlookSpy (dimastr.com/outspy) - 单击项目按钮，它将显示活动对象及其所有属性、方法和事件。