通过 Outlook 电子邮件批量发送多个日历项的 2 种方法

立即分享:

有时,您可能希望将许多日历项目发送给其他人。 在这种情况下,您可能希望分批发送它们。 现在,本文将展示两种获取它的方法。

要通过邮件快速发送日历项目,无论是会议还是约会,您只需打开该项目,然后单击“操作”组中的“转发”按钮即可。 这很容易。 不过,通过这种方式发送多个日历项会有点麻烦。 因此,在这里我们将教您2种更快捷的方法。 它们都可以让你批量完成这个任务。转发日历项目

方法一:批量发送一封邮件

  1. 首先,选择您想要的日历项目。
  2. 然后,按住鼠标右键并将它们拖到“邮件”导航窗格中。将选定的日历项目拖到邮件导航窗格
  3. 接下来,在显示的列表中,选择“复制为带有附件的消息”选项。将此处复制为带有附件的消息
  4. 立即会出现一封新电子邮件,其中已附加选定的日历项目。带有日历项的新邮件

方法 2:批量发送单独的邮件

  1. 首先,在 Outlook 中,通过“Alt + F11”快捷键进入 VBA 编辑器。
  2. 然后,在新窗口中,将以下 VBA 代码放入一个空模块中。
Sub BatchForwardMultipleCalendarItems()
    Dim objSelection As Outlook.Selection
    Dim i As Integer
    Dim objCalendarItem As Outlook.AppointmentItem
    Dim objMail As Outlook.MailItem
 
    Set objSelection = Outlook.Application.ActiveExplorer.Selection
 
    For i = objSelection.Count To 1 Step -1
        Set objCalendarItem = objSelection.Item(i)
 
        Set objMail = Outlook.Application.CreateItem(olMailItem)
        With objMail
            .Attachments.Add objCalendarItem
            'Change the recipient's email address
            .Recipients.Add ("shelly@datanumen.com")
            .Recipients.ResolveAll
            .Subject = objCalendarItem.Subject
            .Body = "Type body here ...."
            .Send
       End With
    Next i
End Sub

VBA 代码 - 在单独的邮件中批量发送多个日历项目

注意:根据您自己的需要更改收件人的电子邮件地址。

  1. 之后,按照“如何在 Outlook 中运行 VBA 代码” 将这个新宏添加到快速访问工具栏。
  2. 最后,试试这个宏。
  • 首先,选择多个日历项目。
  • 然后,单击快速访问工具栏中的宏按钮。
  • Outlook 将立即发送附加在日历项目中的单独邮件。带有日历项目的外发邮件

摆脱 Outlook 数据损坏

由于 Outlook 容易出错和损坏,您必须提防 Outlook 面临的所有风险。 它们通常包括电子邮件中的隐藏病毒、人为错误甚至硬件故障等。除了注意这些危险之外,您还应该采取一些预防措施,例如定期为 Outlook 进行数据备份,准备一个功能强大的 PST修复 像 DataNumen Outlook Repair 等等。

作者简介:

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

立即分享:

评论被关闭。