如何自动拒绝来自Outlook中特定人员的会议邀请?
在Outlook中,我们可以创建一个规则来自动拒绝特定人员的一些会议邀请,但是,如何处理呢? 本文将详细介绍一种方法。
在Outlook中自动拒绝来自特定人员的会议邀请
请执行以下步骤来完成此工作:
1。 首先,您应该为拒绝会议邀请创建一个消息模板。 在里面 想说的话 窗口中,键入要发送的拒绝会议邀请的消息。 看截图:
2。 然后将邮件另存为模板格式,请单击 文件 > 另存为在 另存为 窗口中,将消息的名称输入到 文件名 文本框,然后选择 Outlook模板(* .oft) 来自 保存类型 下拉列表,请参见屏幕截图:
备注:选择时 Outlook模板(* .oft), 将打开一个默认的用户模板文件夹。
3。 然后点击 保存 按钮保存消息模板,然后关闭消息窗口。
4。 然后,您可以创建一个规则。 请点击 规则 > 管理规则和警报 在下面 主页 标签,请参见屏幕截图:
5。 在 规则和警报 对话框,单击 新规则 来自 电子邮件规则 标签,请参见屏幕截图:
6。 在弹出 规则向导,单击“ 对收到的邮件应用规则 选项下 从空规则开始 部分,请参见屏幕截图:
7。 然后点击 下一页 按钮,然后在弹出的对话框中,从 步骤1:选择条件 列表框,然后单击文本链接 人或公共团体 打开 规则地址 对话框,然后选择要拒绝会议的人员,请参见屏幕截图:
8。 点击 OK 按钮,仍在此对话框中,请滚动查看 这是会议邀请或更新 选项从 步骤1:选择条件 列表框,请参见屏幕截图:
9。 继续点击 下一页 按钮,在以下对话框中:
(1.)检查 使用特定模板回复 选项 步骤1:选择动作 列表框;
(2.)然后单击文本链接 一个特定的模板 打开 选择一个回复模板 对话框;
(3.)在 选择一个回复模板 对话框,选择 中的用户模板 文件系统 来自 在看 落下;
(4.)然后选择您刚刚创建的消息名称;
(5.)点击 可选 按钮。
10。 返回原始对话框,继续检查 删除它 在选项 步骤1:选择动作 列表框,请参见屏幕截图:
11。 点击 下一页 > 下一页 进入最后一步对话框。 在里面 完成 规则设置部分,为此规则指定一个名称,然后检查 启用此规则 选项从 步骤2:设定规则选项,请参见屏幕截图:
12。 点击 完成 按钮完成此规则,然后单击 OK 关闭对话框。
13。 从现在开始,当从此特定人员处接收会议时,拒绝电子邮件将自动发送给他,会议消息也将被删除。
自动拒绝特定人员的会议邀请,并从日历中删除会议
第一种方法有助于发送一封电子邮件,告诉对方您将不参加会议,但会议将始终显示在您的日历中。 如果您需要同时删除日历中出现的会议,下面的 VBA 代码可以帮到您。
1。 按住 ALT + F11 键打开 Microsoft Visual Basic应用程序 窗口。
2。 在 Microsoft Visual Basic应用程序 窗口,双击 本次展望会议 来自 Project1(VbaProject.OTM) 窗格以打开模块,然后将以下代码复制并粘贴到空白模块中。
VBA 代码:自动拒绝会议邀请并从日历中删除会议:
Private Sub Application_NewMailEx(ByVal EntryIDCollection As String)
Dim xEntryIDs
Dim xItem
Dim i As Integer
Dim xMeeting As MeetingItem, xMeetingDeclined As MeetingItem
Dim xAppointmentItem As AppointmentItem
On Error Resume Next
xEntryIDs = Split(EntryIDCollection, ",")
For i = 0 To UBound(xEntryIDs)
Set xItem = Application.Session.GetItemFromID(xEntryIDs(i))
If xItem.Class = olMeetingRequest Then
Set xMeeting = xItem
xMeeting.ReminderSet = False
If VBA.LCase(xMeeting.SenderEmailAddress) = VBA.LCase("") Then 'Specify the person you need
Set xAppointmentItem = xMeeting.GetAssociatedAppointment(True)
xAppointmentItem.ReminderSet = False
Set xMeetingDeclined = xAppointmentItem.Respond(olMeetingDeclined)
xMeetingDeclined.Body = "Dear, " & vbCrLf & _
"I am not at office. " & vbCrLf & _
"I'm sorry that I will not attend the meeting invitations."
xMeetingDeclined.Send
xMeeting.Delete
End If
End If
Next
End Sub
3. 然后,保存并关闭此代码窗口。 从现在开始,如果此特定人员有会议,他将收到一封拒绝的电子邮件,并且会议将自动从您的日历中删除。
最佳办公生产力工具
Kutools for Outlook - 超过 100 种强大功能可增强您的 Outlook
🤖 人工智能邮件助手: 具有人工智能魔力的即时专业电子邮件——一键天才回复、完美语气、多语言掌握。轻松改变电子邮件! ...
📧 电子邮件自动化: 外出(适用于 POP 和 IMAP) / 安排发送电子邮件 / 发送电子邮件时按规则自动抄送/密件抄送 / 自动转发(高级规则) / 自动添加问候语 / 自动将多收件人电子邮件拆分为单独的消息 ...
📨 电子邮件管理: 轻松回忆电子邮件 / 按主题和其他人阻止诈骗电子邮件 / 删除重复的电子邮件 / 高级搜索 / 合并文件夹 ...
📁 附件专业版: 批量保存 / 批量分离 / 批量压缩 / 自动保存 / 自动分离 / 自动压缩 ...
🌟 界面魔法: 😊更多又漂亮又酷的表情符号 / 使用选项卡式视图提高 Outlook 工作效率 / 最小化 Outlook 而不是关闭 ...
👍 一键奇迹: 使用传入附件回复全部 / 反网络钓鱼电子邮件 / 🕘显示发件人的时区 ...
👩🏼🤝👩🏻 通讯录和日历: 从选定的电子邮件中批量添加联系人 / 将联系人组拆分为各个组 / 删除生日提醒 ...
超过 100特点 等待您的探索! 单击此处了解更多。