Jak automaticky přeposlat pozvánku na schůzku konkrétní osobě při jejím přijetí v aplikaci Outlook

Sdílej nyní:

Pokud v aplikaci Outlook často potřebujete přeposlat pozvánku na schůzku, kterou přijmete konkrétní osobě, budete toužit po metodě, pomocí které lze dosáhnout „automatického přeposílání“. V tomto článku vám sdílíme takový chytrý přístup.

Z některých důvodů, jako je přidání schůzky do kalendáře vašeho asistenta, může být vždy vyžadováno přeposlání přijaté pozvánky na schůzku vašemu asistentovi. V tomto scénáři můžete použít následující metodu, která může provádět akce „přijmout“ i „přeposlat“ současně jediným kliknutím.

Při předání automaticky přeposlat pozvánku na schůzku konkrétní osobě

Automatické předání pozvánky na schůzku konkrétní osobě při jejím přijetí

  1. Hned na začátku, staraplikace Outlook.
  2. Poté, co se dostanete do hlavního okna, musíte stisknout klávesy „Alt + F11“.
  3. Dále vstoupíte do okna „Microsoft Visual Basic for Applications“, ve kterém musíte otevřít prázdný modul.
  4. Následně zkopírujte a vložte následující kód do tohoto modulu.
Sub AutoForwardMeetingInvitation_WhenAccepting()
    Dim objMeetingInvitation As Outlook.MeetingItem
    Dim objMeeting As Outlook.AppointmentItem
    Dim objMeetingResponse As Outlook.MeetingItem
    Dim objForwardMeeting As Outlook.MeetingItem
 
    Select Case TypeName(Application.ActiveWindow)
           Case "Explorer"
                Set objMeetingInvitation = ActiveExplorer.Selection.Item(1)
           Case "Inspector"
                Set objMeetingInvitation = ActiveInspector.CurrentItem
    End Select
 
    If TypeOf objMeetingInvitation Is MeetingItem Then
 
       Set objMeeting = objMeetingInvitation.GetAssociatedAppointment(True)
 
       'accept the meeting
       Set objMeetingResponse = objMeeting.Respond(olMeetingAccepted)
       objMeetingResponse.Send
 
       'Forward meeting invitation
       Set objForwardMeeting = objMeetingInvitation.Forward
       With objForwardMeeting
            'Change the specific recipient
            .Recipients.Add ("johnjmith@datanumen.com")
            .Send
      End With
 
    End If
End Sub

Kód VBA - automatické předání pozvánky na schůzku konkrétní osobě při jejím přijetí

  1. Poté můžete aktuální okno opustit.
  2. Poté přejděte do nabídky „Soubor“ a klikněte na tlačítko „Možnosti“.
  3. V okně „Možnosti aplikace Outlook“ můžete přepnout na kartu „Panel nástrojů Rychlý přístup“.
  4. Dále postupujte podle pokynů na obrázku níže a přidejte nové makro na panel nástrojů Rychlý přístup.Přidejte makro na panel nástrojů Rychlý přístup
  5. Později se můžete vrátit zpět do navigačního podokna pošty jako obvykle.
  6. Nakonec můžete pořídit snímek:
  • Pro jakotart, vyberte nebo otevřete pozvánku na schůzku v seznamu e -mailů.
  • Poté klikněte na tlačítko makra na panelu nástrojů Rychlý přístup.
  • Ve složce K odeslání uvidíte hned dvě položky. Jednou z nich je přijatá odpověď organizátorovi schůzky. Ten druhý předá pozvánku na schůzku předem definovanému příjemci.

Správně reagujte na chyby aplikace Outlook

Jak všichni víme, Outlook je náchylný k chybám. Měli byste se tedy naučit pár účinných triků, jak se s nimi vypořádat. Obecně se můžete pokusit je opravit pomocí restarting aplikace Outlook v nouzovém režimu. Pokud chyby přetrvávají, můžete se rozhodnout opravit sadu Office, znovu vytvořit profil aplikace Outlook nebo se vrátit k integrovanému nástroji. Pokud ale všechny výše uvedené prostředky selžou, musíte si vybrat, ale použít mnohem účinnější nástroj DataNumen Outlook Repair. To může opravit PST problémy jako vánek.

Úvod autora:

Shirley Zhang je expertem na obnovu dat DataNumen, Inc., která je světovým lídrem v oblasti technologií pro obnovu dat, včetně zotavení sql a výhledové softwarové produkty pro opravy. Pro více informací navštivte www.datanumen.com

Sdílej nyní:

Komentáře jsou uzavřeny.