如何在 Outlook 中自动接受所有传入的任务请求

展望解决方案 2025 年 9 月 29 日
立即分享：

与发送会议请求一样，Outlook 也允许用户向其他人发送任务请求。 如果您想自动接受所有传入的任务请求，可以使用本文分享的方法。

您可能熟悉 Outlook 中的会议请求。 收到后，您将需要根据会议回复发送，即接受或拒绝或暂定。 同样，用户可以将任务分配给其他人并要求他们发送响应。 如果你经常接到上司的此类任务要求，而你总是选择“接受”，你可以通过以下方式申请。 它可以自动接受传入的任务而不会打扰您。

自动接受 Outlook 中的所有传入任务请求

自动接受所有传入的任务请求

  1. 首先，您可以像往常一样启动 Outlook 程序。
  2. 然后，在 Outlook 中，您应该点击“Alt + F11”键按钮。
  3. 接下来，您将进入 Outlook VBA 编辑器，即“Microsoft Visual Basic for Applications”窗口。
  4. 在此窗口中，您应该访问“ThisOutlookSession”项目。 在左侧边栏中找到并单击它。
  5. 随后，您可以将以下 VBA 代码复制并粘贴到其中。
Public WithEvents objInbox As Outlook.folder
Public WithEvents objItems As Outlook.Items

Private Sub Application_Startup()
    Set objInbox = Outlook.Application.Session.GetDefaultFolder(olFolderInbox)
    Set objItems = objInbox.Items
End Sub

'Occurs when new item arrives in Inbox
Private Sub objItems_ItemAdd(ByVal Item As Object)
    Dim objTaskRequest As Outlook.TaskRequestItem
    Dim objTask As Outlook.TaskItem
    Dim objResponse As Object
 
    If TypeOf Item Is TaskRequestItem Then
       Set objTaskRequest = Item
       Set objTask = objTaskRequest.GetAssociatedTask(True)
       'Accept it
       'if you want "auto decline", replace "olTaskAccept" with "olTaskDecline"
       Set objResponse = objTask.Respond(olTaskAccept, True, True)
       objResponse.Send
       objResponse.Delete
       objTaskRequest.Delete
    End If
End Sub

VBA 代码 - 自动接受所有传入的任务请求

  1. 之后，您必须签署此代码。 单击“工具”>“数字签名”。 然后按照屏幕上的向导完成它。
  2. 稍后，您必须修改您的 Outlook 宏安全设置，确保启用此宏。
  3. 最后，您可以重启 Outlook 应用程序来激活此宏。
  4. 从现在开始，每当任务请求到达您的收件箱时，Outlook 都会立即代表您接受它。 您可以在您的任务文件夹中正常查看和处理它。检查已接受的任务请求

永远不要忽视任何 Outlook 错误

多个用户往往会忽略 Outlook 中的小错误。 虽然Outlook可以自行恢复，但其实还是建议尽快解决错误。 通常，每次遇到任何错误时，您都应该应用 收件箱维修工具 扫描您的 Outlook 文件是否存在问题。 这是因为这个内置工具能够有效修复小故障。 然而，如果该实用程序失败，您最好求助于更强大的工具，例如 DataNumen Outlook Repair. 它能够解决许多 Outlook 问题。

作者简介：

Shirley Zhang 是一位数据恢复专家 DataNumen, Inc.，它是数据恢复技术领域的世界领先者，包括 中密度纤维板恢复 和 outlook 修复软件产品。 欲了解更多信息，请访问 datanumen.com

立即分享：

评论被关闭。