Wie kann man Besprechungsanfragen einer bestimmten Person in Outlook automatisch akzeptieren?

Wenn Sie in Outlook eine Besprechungseinladung erhalten, müssen Sie die Anfrage manuell annehmen und dem Absender eine Antwort senden. Gibt es eine einfache Möglichkeit, Einladungen einer bestimmten Person automatisch anzunehmen? Die in diesem Artikel vorgestellte Methode unterstützt Sie dabei.

Automatisches Annehmen von Besprechungsanfragen einer bestimmten Person mithilfe von VBA-Code

---

Automatisches Annehmen von Besprechungsanfragen einer bestimmten Person mithilfe von VBA-Code

Der folgende VBA-Code ermöglicht die automatische Annahme von Besprechungsanfragen, die von einer bestimmten Person in Outlook gesendet wurden. Gehen Sie dazu wie folgt vor:

1. Drücken Sie die Tasten Alt+F11, um das Fenster Microsoft Visual Basic für Applikationen zu öffnen.

2. Doppelklicken Sie im Fenster Microsoft Visual Basic für Applikationen im linken Bereich auf ThisOutlookSession, um das Codefenster zu öffnen, und fügen Sie anschließend den unten stehenden VBA-Code in das Fenster ein. Siehe Screenshot:

VBA-Code: Automatisches Annehmen von Besprechungsanfragen einer bestimmten Person in 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

Hinweis: Ersetzen Sie im Code bitte „Absendername“ durch den gewünschten Anzeigenamen des Absenders.

3. Speichern Sie den Code und drücken Sie anschließend die Tasten Alt + Q, um das Fenster Microsoft Visual Basic für Applikationen zu schließen.

4. Starten Sie Outlook neu, damit der Code aktiv wird.

Ab sofort werden Besprechungsanfragen der im Code angegebenen Person automatisch angenommen, und der Absender erhält umgehend eine Antwort-E-Mail.

Hinweis: Das E-Mail-Konto, das die Besprechungsanfrage erhält, muss in Outlook als Standardkonto eingerichtet sein.

；

---

Verwandte Artikel:

• Wie lehnt man eine Besprechungseinladung in Outlook ab, behält sie aber dennoch im Kalender?
• Wie lehnt man alle zukünftigen Termine einer wiederkehrenden Besprechungsserie in Outlook ab?