Direkt zum Inhalt

Wie kann ich das Senden einer Besprechungseinladung in Outlook verzögern? 

Normalerweise können Sie die Funktion "Zustellung verzögern" zum Senden einer Nachricht zu einem bestimmten Zeitpunkt anstatt jetzt anwenden. Manchmal möchten Sie jedoch das Senden einer Besprechungseinladung wie eine E-Mail verzögern. Wie können Sie eine Besprechungseinladung zum gewünschten Zeitpunkt senden, wenn Sie dies in Outlook benötigen?

Verzögern Sie das Senden einer Besprechungseinladung in Outlook mit VBA-Code


Verzögern Sie das Senden einer Besprechungseinladung in Outlook mit VBA-Code

Möglicherweise gibt es keine direkte Möglichkeit, eine Einladung zu einem Meeting in Outlook zu verzögern, aber der folgende VBA-Code kann Ihnen einen Gefallen tun. Bitte tun Sie Folgendes:

1. Zunächst sollten Sie eine neue Aufgabe erstellen. Im neuen Aufgabe Fenster:

(1.) Geben Sie das Thema, das Startdatum und das Enddatum der Sitzung an.

(2.) Legen Sie ein Erinnerungsdatum und eine Erinnerungszeit fest, an die Sie die Besprechungseinladung senden möchten.

(3.) Geben Sie die Besprechungsnachricht nach Bedarf ein.

doc Verzögerung beim Senden von Besprechungen 1

2. Klicken Sie nach dem Erstellen der Aufgabe auf Speichern und schließen Option zum Schließen dieses Fensters.

3. Halten Sie dann die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

4. In dem Microsoft Visual Basic für Applikationen Fenster, Doppelklick DieseOutlookSession von dem Projekt1 (VbaProject.OTM) Bereich, um den Modus zu öffnen, und kopieren Sie dann den folgenden Code und fügen Sie ihn in das leere Modul ein.

VBA-Code: Verzögerung einer Einladung zum Senden eines Meetings:

Private Sub Application_Reminder(ByVal Item As Object)
    Dim xTaskItem As TaskItem
    Dim xAppointmentItem As AppointmentItem
    Dim xRcpArr() As String
    If (Item.Class <> olTask) Or (LCase(Item.Subject) <> "Meeting test") Then
        Exit Sub
    End If
    Set xTaskItem = Item
    xRcpArr = VBA.Split(",,", ",")
    Set xAppointmentItem = Outlook.Application.CreateItem(olAppointmentItem)
    With xAppointmentItem
        .MeetingStatus = olMeeting
        For i = 0 To UBound(xRcpArr)
            .Recipients.Add (xRcpArr(i))
        Next
        .Subject = xTaskItem.Subject
        .Location = "Office room 1002"
        .Start = xTaskItem.StartDate + #2:00:00 PM#
        .Body = xTaskItem.Body
        .Duration = 120
        .ReminderSet = True
        .ReminderMinutesBeforeStart = 20
        .Save
        .Send
    End With
    xTaskItem.MarkComplete
    Set xTaskItem = Nothing
End Sub

doc Verzögerung beim Senden von Besprechungen 2

Note: Im obigen Code: Besprechungstest ist das Thema, das Sie in Schritt 1 für das Meeting erstellt haben. und Sie sollten die Informationen von ändern Empfängeradressen, Treffpunkt, Startzeit und Besprechungsdauer zu deinen eigenen.

5. Speichern und schließen Sie den Code und starten Sie Outlook neu, damit dieser Code wirksam wird.

6. Von nun an sendet Outlook die Besprechungseinladung automatisch, wenn die Erinnerung an das Aufgabenelement zu dem von Ihnen festgelegten Zeitpunkt angezeigt wird.


Beste Office-Produktivitätstools

Kutools for Outlook - Über 100 leistungsstarke Funktionen zur Optimierung Ihres Outlooks

🤖 KI-Mail-Assistent: Sofortige Profi-E-Mails mit KI-Magie – geniale Antworten mit einem Klick, perfekter Ton, mehrsprachige Beherrschung. Verwandeln Sie den E-Mail-Versand mühelos! ...

📧 E-Mail Automation: Abwesenheit (verfügbar für POP und IMAP)  /  Planen Sie das Senden von E-Mails  /  Automatisches CC/BCC nach Regeln beim E-Mail-Versand  /  Automatische Weiterleitung (erweiterte Regeln)   /  Begrüßung automatisch hinzufügen   /  Teilen Sie E-Mails mit mehreren Empfängern automatisch in einzelne Nachrichten auf ...

📨 E-Mail-Management: E-Mails einfach abrufen  /  Blockieren Sie betrügerische E-Mails nach Betreff und anderen  /  Doppelte E-Mails löschen  /  Erweiterte Suche  /  Ordner konsolidieren ...

📁 Anhänge ProBatch speichern  /  Stapeltrennung  /  Stapelkomprimierung  /  Automatisches Speichern   /  Automatische Trennung  /  Automatische Komprimierung ...

???? Schnittstellenmagie: 😊Mehr hübsche und coole Emojis   /  Steigern Sie Ihre Outlook-Produktivität mit Registerkartenansichten  /  Ausblick minimieren statt schließen ...

👍 Wunder mit einem Klick: Allen mit eingehenden Anhängen antworten  /   Anti-Phishing-E-Mails  /  🕘Zeitzone des Absenders anzeigen ...

👩🏼‍🤝‍👩🏻 Kontakte und Kalender: Fügen Sie Kontakte aus ausgewählten E-Mails im Stapel hinzu  /  Teilen Sie eine Kontaktgruppe in einzelne Gruppen auf  /  Geburtstagserinnerungen entfernen ...

Auf über 100 Eigenschaften Warten Sie auf Ihre Erkundung! Klicken Sie hier, um mehr zu erfahren.

 

 

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations