Wie werden Besprechungseinladungen automatisch an eine bestimmte Person in Outlook weitergeleitet?
In Outlook können Sie eine Besprechungseinladung direkt an eine bestimmte Person weiterleiten, indem Sie die Weiterleitungsfunktion manuell verwenden. Manchmal müssen Sie die Besprechungseinladungen jedoch automatisch an eine bestimmte Person weiterleiten, wenn Sie die Besprechung annehmen. In diesem Artikel werde ich darüber sprechen, wie Sie eine Besprechungseinladung so schnell wie möglich automatisch an eine Person weiterleiten können.
Das Weiterleiten von Besprechungen wird automatisch in Outlook mit VBA-Code an eine bestimmte Person eingeladen
Hier ist ein nützlicher VBA-Code, mit dem Sie die Besprechungseinladung nach dem Akzeptieren automatisch an eine bestimmte Person weiterleiten können. Gehen Sie dazu folgendermaßen vor:
1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. 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: Besprechungen zur automatischen Weiterleitung werden an eine bestimmte Person eingeladen:
Public WithEvents ReceivedItems As Outlook.Items
Private Sub Application_Startup()
Set ReceivedItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub ReceivedItems_ItemAdd(ByVal Item As Object)
Dim xMeetingItem As MeetingItem
Dim xMeetingResponse As MeetingItem
Dim xForwardMeeting As MeetingItem
Dim xAppointmentItem As AppointmentItem
On Error Resume Next
If TypeOf Item Is MeetingItem Then
Set xMeetingItem = Item
Set xAppointmentItem = xMeetingItem.GetAssociatedAppointment(True)
Set xMeetingResponse = xAppointmentItem.Respond(olMeetingAccepted, True)
xMeetingResponse.Send
Set xForwardMeeting = xMeetingItem.Forward
With xForwardMeeting
With .Recipients
.Add "" 'change address to your own
.ResolveAll
End With
.Send
End With
End If
End Sub
Note: Im obigen Code sollten Sie die Empfängeradresse in Ihre eigene ändern.
3. Speichern Sie dann den Code und starten Sie Outlook neu, um den Codeeffekt zu erzielen.
4. Wenn Sie nun eine Besprechungseinladung erhalten, wird die Besprechung automatisch akzeptiert und gleichzeitig wird diese Besprechung sofort automatisch an Ihre spezifische Person weitergeleitet.
Note: Dieser Code ist nur für das Standardkonto verfügbar.
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 Pro: Batch 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.