如何自动拒绝来自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特点 等待您的探索！ 单击此处了解更多。
