2 快速方法将多个 Outlook 任务批量分配给一个人

立即分享:

如果您在 Outlook 中创建了多个任务,现在想将它们分配给一个人,您将渴望批量分配它们的方法。 在本文中,我们将向您展示这两种方法。

有时,出于某些原因,您需要将您自己的“任务”文件夹中的多个现有任务分配给某人。 一般来说,要分配任务,您必须打开它,然后单击“分配任务”按钮,在“收件人”字段中填写收件人,最后单击“发送”按钮。 但是,在您要分配许多任务的情况下,这种方法太繁琐了。 因此,接下来,我们将与您分享2种更加高效便捷的方法。

分配任务

方法一:将任务作为邮件附件转发

  1. 到tart 同时,在任务文件夹中,按下“Ctrl”键,同时选择您要分配的所有任务。
  2. 然后,单击“主页”选项卡上“响应”组中的“转发”按钮。转发选定的任务
  3. 将立即显示一封新电子邮件。
  4. 在这封邮件中,已附上所有选定的任务。电子邮件中的附加任务
  5. 最后,您可以随意添加收件人、撰写和发送邮件。

方法 2:使用 Outlook VBA 批量分配任务

  1. 首先,通过参考“转到 Outlook VBA 编辑器如何在 Outlook 中运行 VBA 代码“。
  2. 接下来,将以下 VBA 代码放入模块中。
Sub AssignMultipleTasksToAPerson()
    Dim objSelection As Outlook.Selection
    Dim objTask As Outlook.TaskItem
    Dim i As Long
    Dim lTaskCount As Long
 
    'Get selected items
    Set objSelection = Outlook.Application.ActiveExplorer.Selection
 
    If Not (objSelection Is Nothing) Then
       lTaskCount = 0
       For i = objSelection.Count To 1 Step -1
           If TypeOf objSelection(i) Is TaskItem Then
              Set objTask = objSelection(i)
              With objTask
                   'Alter the recipient email address as per your needs
                   .Recipients.Add ("johnsmith@datanumen.com")
                   .Recipients.ResolveAll
                   .Assign
                   .Send
              End With
              lTaskCount = lTaskCount + 1
           End If
       Next
 
      'Get prompt
       MsgBox lTaskCount & " tasks have been assigned!", vbInformation + vbOKOnly
    End If
End Sub

VBA代码——批量分配多个Outlook任务给一个人

  1. 之后,将此宏添加到快速访问工具栏。
  2. 稍后,选择要分配的任务。
  3. 最后,单击快速访问工具栏中的宏按钮。
  4. 这些任务将立即分配给预定义的收件人。分配的任务

摆脱痛苦的 Outlook 数据丢失

遭受数据丢失,包括 Outlook 数据丢失,将是非常痛苦的。 因此,有必要采取有效的预防措施来防止这种情况发生。 首先,您应该定期进行数据备份。 此外,您需要知道从哪里可以获得内置修复工具 – 扫描仪 以及如何运行它。 最后但同样重要的是,为了在收件箱修复工具出现故障时提供即时救援,您最好提前准备一个强大的外部工具,例如 DataNumen Outlook Repair.

作者简介:

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

立即分享:

评论被关闭。