Outlook'ta belirli bir kişiden gelen toplantı taleplerini otomatik olarak nasıl kabul edebilirim?

Outlook’ta bir toplantı daveti aldığınızda, toplantıyı manuel olarak kabul edip gönderene yanıt vermeniz gerekir. Peki belirli bir kişiden gelen toplantı davetlerini otomatik olarak kabul etmenin kolay bir yolu var mı? Bu makaledeki yöntem tam da size yardımcı olacak!

Belirli bir kişiden gelen toplantı taleplerini VBA koduyla otomatik kabul etme

---

Belirli bir kişiden gelen toplantı taleplerini VBA koduyla otomatik kabul etme

Aşağıdaki VBA kodu, Outlook’ta belirli bir kişiden gelen toplantı taleplerini otomatik olarak kabul etmenize olanak tanır. Lütfen aşağıdaki adımları uygulayın.

1. Alt+F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.

2. Microsoft Visual Basic for Applications penceresinde, sol bölmedeki ThisOutlookSession öğesine çift tıklayarak Kod penceresini açın ve ardından aşağıdaki VBA kodunu bu pencereye kopyalayın. Ekran görüntüsüne bakın:

VBA kodu: Outlook'ta belirli bir kişiden gelen toplantı taleplerini otomatik kabul etme

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

Not: Kodda lütfen “Gönderen Adı” kısmını, gönderenin görünen adıyla değiştirin.

3. Kodu kaydedin, ardından Alt+Q tuşlarına basarak Microsoft Visual Basic for Applications penceresini kapatın.

4. Bu kodun etkinleşmesi için Outlook'u yeniden başlatın.

Artık kodda belirttiğiniz kişiden gelen toplantı talepleri alındığında, toplantı otomatik olarak kabul edilecek ve gönderen kişi bir onay e-postası alacaktır.

Not: Toplantı davetini alan e-posta hesabı, Outlook’ta varsayılan hesabınız olmalıdır.

；

---

İlgili makaleler:

• Outlook’ta bir toplantı davetini nasıl reddederim ama yine de takvimimde görünmeye devam etsin?
• Outlook’ta gelecekteki tüm tekrarlayan toplantıları nasıl reddedebilirim?