如何运行 Outlook 规则然后将邮件移动到文件夹?

如何运行 Outlook 规则然后将邮件移动到文件夹?

我想要运行一些 Outlook 规则,运行该规则后用户将消息从收件箱移动到某个文件夹。

答案1

似乎我找到了我自己的问题的答案:)我必须定义以下宏并在 myOlItems_ItemAdd 方法中执行我想要的操作

Public WithEvents myOlItems As Outlook.Items

Public Sub Application_Startup()

' Reference the items in the Inbox. Because myOlItems is declared
' "WithEvents" the ItemAdd event will fire below.
 Set myOlItems = Outlook.Session.GetDefaultFolder(olFolderInbox).Items
 Set ee = Outlook.Session.GetDefaultFolder(olFolderInbox).Folders("MyTestFolder")
 Set myOlItems = ee.Items
End Sub

Private Sub myOlItems_ItemAdd(ByVal Item As Object)

 Debug.Print (Item.Subject)
End Sub

答案2

Outlook 提供了可以触发规则的预定义事件列表。如果您找不到可以满足您需求的规则,那么您的运气可能就不好了。虽然我怀疑您可以为此编写自己的 COM 插件,但这并不适合普通人。

相关内容