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

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.

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

1. Na samém začátku spusťte aplikaci 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

5. Poté můžete aktuální okno opustit.
6. Poté přejděte do nabídky „Soubor“ a klikněte na tlačítko „Možnosti“.
7. V okně „Možnosti aplikace Outlook“ můžete přepnout na kartu „Panel nástrojů Rychlý přístup“.
8. Dále postupujte podle pokynů na obrázku níže a přidejte nové makro na panel nástrojů Rychlý přístup.
9. Později se můžete vrátit zpět do navigačního podokna pošty jako obvykle.
10. Nakonec můžete pořídit snímek:

• Pro začátek vyberte nebo otevřete pozvánku na schůzku v seznamu adresátů.
• 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. Proto byste se měli naučit několik účinných triků, jak se s nimi vypořádat. Obecně se je můžete pokusit opravit restartováním Outlooku v nouzovém režimu. Pokud chyby přetrvávají, můžete se rozhodnout opravit sadu Office, znovu sestavit profil Outlooku nebo se vrátit k vestavěnému nástroji. Pokud však všechny výše uvedené metody selžou, nezbývá vám nic jiného než použít mnohem účinnější nástroj, jako je 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