在 Outlook 中，我们可以轻松通过邮件创建新任务。但您是否尝试过在收到特定邮件时自动生成新任务？例如，我只希望自动从老板发来的邮件创建任务。您会如何在 Outlook 中实现这一需求？

使用 VBA 代码在 Outlook 中接收特定邮件时自动创建新建任务

---

使用 VBA 代码在 Outlook 中接收特定邮件时自动创建新建任务

目前尚无直接的方法或规则可实现该需求，但我可以通过结合 VBA 代码与规则来帮助您完成。请按照以下步骤操作：

1. 启动 Outlook 后，按住“ALT + F11”即可打开“Microsoft Visual Basic for Applications”窗口。

2. 在“Microsoft Visual Basic for Applications”窗口中，双击“Project 1 （VbaProject.OTM）”窗格下的“ThisOutlookSession”，在打开的代码窗口中，将以下代码复制并粘贴到空白模块内。

VBA 代码：在收到邮件时自动创建新建任务：

Sub CreateNewTask(Item As Outlook.MailItem)
Dim xNewTask As TaskItem
On Error Resume Next
Set xNewTask = Outlook.CreateItem(olTaskItem)
With xNewTask
    .Subject = Item.Subject
    .StartDate = Item.ReceivedTime
    .DueDate = Item.ReceivedTime + 1
    .Body = Item.Body
    .Importance = olImportanceHigh
    .Save
End With
Set xNewTask = Nothing
End Sub

3. 接下来，请保存并关闭代码。插入代码后，需要创建相应规则。请点击“规则” > “管理规则和通知”，该选项位于“开始”选项卡下。详见截图：

4. 在“规则和通知”对话框中，点击“新建规则”。请参见截图：

5. 在弹出的“规则向导”中，选择“从头开始创建规则”下的“对我接收的邮件应用规则”。请参见截图：

6. 点击“下一步”按钮。在“步骤 1：选择条件”列表框中，选择您需要的条件。本例中，我选择了“来自人员或公用组”选项。接着，在“步骤 2：编辑规则内容（单击带下划线的值）”部分，点击“人员或公用组”链接，打开“规则地址”对话框，并双击您希望自动创建任务的邮箱地址。请参见截图：

7. 点击“确定”，随后继续点击“下一步”。在“步骤 1：选择操作”列表框中，勾选“运行脚本”。接着，在“步骤 2：编辑规则内容（单击带下划线的值）”部分，点击“脚本”链接，弹出“选择脚本”对话框后，选择之前添加的宏并点击“确定”。

8. 接着点击“下一步” > “下一步”，进入“完成”规则设置界面。在“步骤 1：为此规则指定名称”的文本框中输入规则名称，并在“步骤 2：设置规则选项”中勾选“启用此规则”。如截图所示：

9. 随后，点击“完成”按钮，并选择“确定”以关闭“规则和通知”对话框。

10. 从现在起，每当您收到来自指定地址的邮件时，Outlook 将自动为您创建相应的任务。您可以在任务文件夹中轻松查看这些任务。请参见截图：