跳到主要内容

如何在Outlook中延迟发送会议邀请? 

通常,您可以应用“延迟传递”功能在特定时间(而不是现在)发送消息。 但是,有时您想延迟发送会议邀请(如电子邮件)。 如何根据需要在Outlook中按需要的时间发送会议邀请?

使用VBA代码在Outlook中延迟发送会议邀请


使用VBA代码在Outlook中延迟发送会议邀请

可能是没有直接的方法可以在Outlook中延迟会议邀请,但是下面的VBA代码可以帮您一个忙,请这样做:

1。 首先,您应该创建一个新任务。 在新 任务 窗口:

(1.)指定会议的主题,开始日期,结束日期;

(2.)设置要发送会议邀请的提醒日期和时间;

(3.)根据需要键入会议消息。

doc延迟发送会议1

2。 创建任务后,请单击 保存并关闭 关闭此窗口的选项。

3。 然后,按住 ALT + F11 键打开 Microsoft Visual Basic应用程序 窗口。

4。 在 Microsoft Visual Basic应用程序 窗口,双击 本次展望会议 来自 Project1(VbaProject.OTM) 窗格以打开模式,然后将以下代码复制并粘贴到空白模块中。

VBA代码:延迟发送会议邀请:

Private Sub Application_Reminder(ByVal Item As Object)
    Dim xTaskItem As TaskItem
    Dim xAppointmentItem As AppointmentItem
    Dim xRcpArr() As String
    If (Item.Class <> olTask) Or (LCase(Item.Subject) <> "Meeting test") Then
        Exit Sub
    End If
    Set xTaskItem = Item
    xRcpArr = VBA.Split(",,", ",")
    Set xAppointmentItem = Outlook.Application.CreateItem(olAppointmentItem)
    With xAppointmentItem
        .MeetingStatus = olMeeting
        For i = 0 To UBound(xRcpArr)
            .Recipients.Add (xRcpArr(i))
        Next
        .Subject = xTaskItem.Subject
        .Location = "Office room 1002"
        .Start = xTaskItem.StartDate + #2:00:00 PM#
        .Body = xTaskItem.Body
        .Duration = 120
        .ReminderSet = True
        .ReminderMinutesBeforeStart = 20
        .Save
        .Send
    End With
    xTaskItem.MarkComplete
    Set xTaskItem = Nothing
End Sub

doc延迟发送会议2

备注:在上面的代码中: 会议测试 是您在步骤1中为会议创建的主题; 并且,您应该更改以下信息 收件人地址, 会议地点, 开始时间会议时间 对你自己。

5。 保存并关闭代码,然后重新启动Outlook,以使此代码生效。

6。 从现在开始,当您在设置的特定时间弹出任务项目提醒时,Outlook将自动发送会议邀请。


最佳办公生产力工具

Kutools for Outlook - 超过 100 种强大功能可增强您的 Outlook

📧 电子邮件自动化: 外出(适用于 POP 和 IMAP)  /  安排发送电子邮件  /  发送电子邮件时按规则自动抄送/密件抄送  /  自动转发(高级规则)   /  自动添加问候语   /  自动将多收件人电子邮件拆分为单独的消息 ...

📨 电子邮件管理: 轻松回忆电子邮件  /  按主题和其他人阻止诈骗电子邮件  /  删除重复的电子邮件  /  高级搜索  /  合并文件夹 ...

📁 附件专业版批量保存  /  批量分离  /  批量压缩  /  自动保存   /  自动分离  /  自动压缩 ...

🌟 界面魔法: 😊更多又漂亮又酷的表情符号   /  使用选项卡式视图提高 Outlook 工作效率  /  最小化 Outlook 而不是关闭 ...

👍 一键奇迹: 使用传入附件回复全部  /   反网络钓鱼电子邮件  /  🕘显示发件人的时区 ...

👩🏼‍🤝‍👩🏻 通讯录和日历: 从选定的电子邮件中批量添加联系人  /  将联系人组拆分为各个组  /  删除生日提醒 ...

超过 100特点 等待您的探索! 单击此处了解更多。

了解更多       免费下载      购买
 

 

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations