Question

我的Outlook配置文件中有两个邮箱，每当我的辅助邮箱收到新邮件时，我都需要执行一个脚本。

Answer 1

您可以使用在Outlook后台运行的一块VB来监控您的文件夹。然后从VB代码中你可以做你想做的任何事情。

首先右键单击你的色带，“优化色带”。从“所有选项卡”中选择命令，并确保将“主选项卡”中的开发人员添加到功能区中。然后在功能区开发人员选项卡中，您可以单击“Visual Basic” 在概述中，您可以看到名为“ThisOutlookSession”的Microsoft Outlook对象。在这里，我们可以添加一些代码，这些代码将在您启动Outlook时加载。

我们将创建一些基本内容来监控文件夹以获取消息和信息。如何处理它们

Option Explicit

Private WithEvents SecondaryInbox As Items

Private Sub Application_Startup()

    Dim Ns As Outlook.NameSpace
    Set Ns = Application.GetNamespace("MAPI")
    Set SecondaryInbox = Ns.Folders("Name of Secondary Inbox").Folders("Inbox").Items
    Set Ns = Nothing
End Sub

Public Sub SecondaryInbox_ItemAdd(ByVal Item As Object)
    On Error Resume Next
    ' Do something on item add event..
    If TypeName(Item) = "MailItem" Then
        ' ...
    End If
End Sub

在Outlook 2010中，如何在辅助邮箱中收到新邮件时触发宏？

1 个答案: