Přejít k hlavnímu obsahu

Jak odložit odesílání pozvánky na schůzku v Outlooku? 

Za normálních okolností můžete použít funkci Zpožděné doručení pro odeslání zprávy v konkrétní čas, nikoli právě teď. Někdy však chcete odložit odesílající pozvánku na schůzku jako e-mail. Jak byste mohli v Outlooku odeslat pozvánku na schůzku v požadovaném čase, jak potřebujete?

Zpoždění odesílající pozvánky na schůzku v Outlooku s kódem VBA


Zpoždění odesílající pozvánky na schůzku v Outlooku s kódem VBA

Je možné, že neexistuje žádný přímý způsob, jak odložit pozvání na schůzku v aplikaci Outlook, ale níže uvedený kód VBA vám může udělat laskavost, udělejte to takto:

1. Nejprve byste měli vytvořit nový úkol. V novém Úkol okno:

(1.) Uveďte předmět, datum zahájení, datum ukončení schůzky;

(2.) Nastavte datum a čas připomenutí, kdy chcete poslat pozvánku na schůzku;

(3.) Napište zprávu o schůzce, jak potřebujete.

odeslání schůzky se zpožděním dokumentu 1

2. Po vytvoření úkolu klikněte Uložit a zavřít možnost zavřít toto okno.

3. Poté podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

4. V Microsoft Visual Basic pro aplikace okno, dvakrát klikněte ThisOutlookSession z Project1 (VbaProject.OTM) v podokně otevřete režim a poté zkopírujte a vložte následující kód do prázdného modulu.

Kód VBA: Zpoždění odesílání pozvánky na schůzku:

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

odeslání schůzky se zpožděním dokumentu 2

Poznámka: Ve výše uvedeném kódu: Test schůzky je předmět, který jste vytvořili pro schůzku v kroku 1; a měli byste změnit informace o adresy příjemců, místo schůzky, Doba spuštění a trvání schůzky k sobě.

5. Uložte a zavřete kód a poté restartujte Outlook, aby se tento kód projevil.

6. Od nynějška, když se připomenutí položky úkolu objeví v konkrétní čas, který nastavíte, Outlook automaticky odešle pozvánku na schůzku.


Nejlepší nástroje pro produktivitu v kanceláři

Kutools pro aplikaci Outlook - Více než 100 výkonných funkcí, které doplní váš Outlook

???? Automatizace e-mailu: Mimo kancelář (k dispozici pro POP a IMAP)  /  Naplánujte odesílání e-mailů  /  Automatická kopie/skrytá kopie podle pravidel při odesílání e-mailu  /  Automatické přeposílání (pokročilá pravidla)   /  Automatické přidání pozdravu   /  Automaticky rozdělte e-maily pro více příjemců na jednotlivé zprávy ...

📨 Email management: Snadné vyvolání e-mailů  /  Blokujte podvodné e-maily podle předmětů a dalších  /  Odstranit duplicitní e-maily  /  pokročilé vyhledávání  /  Konsolidovat složky ...

📁 Přílohy ProDávkové uložení  /  Dávkové odpojení  /  Dávková komprese  /  Automaticky uložit   /  Automatické odpojení  /  Automatické komprimování ...

???? Rozhraní Magic: 😊 Více pěkných a skvělých emotikonů   /  Zvyšte produktivitu své aplikace Outlook pomocí zobrazení s kartami  /  Minimalizujte aplikaci Outlook namísto zavírání ...

???? Zázraky na jedno kliknutí: Odpovědět všem s příchozími přílohami  /   E-maily proti phishingu  /  🕘Zobrazit časové pásmo odesílatele ...

👩🏼‍🤝‍👩🏻 Kontakty a kalendář: Dávkové přidání kontaktů z vybraných e-mailů  /  Rozdělit skupinu kontaktů na jednotlivé skupiny  /  Odeberte připomenutí narozenin ...

Přes 100 Vlastnosti Očekávejte svůj průzkum! Kliknutím sem zobrazíte další informace.

Více       Stažení zdarma      Nákup
 

 

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