如何在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中的默认帐户。