如何在Outlook中自动接受来自特定人员的会议请求?
在Outlook中接收会议邀请时,您需要手动接受会议请求并将响应发送给发件人。 有没有简单的方法可以自动从Outlook中的特定人员接受它? 本文中的方法将帮您一个忙。
使用VBA代码自动接受特定人员的会议请求
下面的VBA代码可以帮助您自动接受Outlook中特定人员发送的会议请求。 请执行以下操作。
1。 按 其他 + F11 键打开 Microsoft Visual Basic应用程序 窗口。
2。 在里面 Microsoft Visual Basic应用程序 窗口,双击 本次展望会议 在左窗格中打开“代码”窗口,然后将VBA代码下面的内容复制到该窗口中。 看截图:
VBA代码:自动接受Outlook中特定人员的会议请求
Public WithEvents GItems As Outlook.Items
'Updated by ExtendOffice 20180814
Private Sub Application_Startup()
Set GItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub GItems_ItemAdd(ByVal Item As Object)
Dim xMtRequest As MeetingItem
Dim xAppointmentItem As AppointmentItem
Dim xMtResponse As MeetingItem
If Item.Class = olMeetingRequest Then
Set xMtRequest = Item
Set xAppointmentItem = xMtRequest.GetAssociatedAppointment(True)
If xAppointmentItem.GetOrganizer.Name = "Sender Name" Then
With xAppointmentItem
.ReminderMinutesBeforeStart = 45
.Categories = "Orange Category"
.Save
End With
Set xMtResponse = xAppointmentItem.Respond(olMeetingAccepted)
xMtResponse.Send
xMtRequest.Delete
End If
End If
End Sub
备注:在代码中,请替换“发件人名称”以及发件人的显示名称。
3.保存代码,然后按 其他 + Q 关闭键 Microsoft Visual Basic应用程序 窗口。
4.重新启动Outlook以使此代码生效。
从现在开始,当接收到您在代码中指定的人发送的会议请求时,会议将被自动接受,发件人也将收到一封回复电子邮件。
备注:接收会议请求的电子邮件帐户应该是Outlook中的默认帐户。
相关文章:
Kutools for Outlook-为Outlook带来100个高级功能,并使工作更加轻松!
- 自动CC / BCC 根据规则发送电子邮件; 自动转发 自定义多封电子邮件; 自动回复 没有交换服务器,还有更多自动功能...
- BCC警告 -当您尝试全部答复时显示消息 如果您的邮件地址在“密件抄送”列表中; 缺少附件时提醒,还有更多提醒功能...
- 在邮件对话中回复(全部)带有所有附件; 回复许多电子邮件 很快; 自动添加问候语 回复时将日期添加到主题中...
- 附件工具:管理所有邮件中的所有附件, 自动分离, 全部压缩,全部重命名,全部保存...快速报告, 计算选定的邮件...
- 强大的垃圾邮件 习俗 删除重复的邮件和联系人... 使您能够在Outlook中做得更聪明,更快和更好。

