Note: The other languages of the website are Google-translated. Back to English

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("yy@addin99.com,sky@addin99.com,ruby@addin99.com", ",")
    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.


Kutools pro Outlook - přináší do aplikace Outlook 100 pokročilých funkcí a usnadňuje práci!

  • Auto CC / BCC podle pravidel při odesílání e-mailů; Automatické předávání Více e-mailů podle zvyku; Automatická odpověď bez serveru Exchange a dalších automatických funkcí ...
  • Varování BCC - zobrazit zprávu, když se pokusíte odpovědět všem pokud je vaše e-mailová adresa v seznamu BCC; Připomenout, když chybí přílohya další připomínající funkce ...
  • Odpovědět (Vše) Se všemi přílohami v e-mailové konverzaci; Odpovězte na mnoho e-mailů během několika sekund; Automatické přidání pozdravu při odpovědi; Přidat datum do předmětu ...
  • Nástroje pro přílohy: Spravujte všechny přílohy ve všech e-mailech, Automatické odpojení, Komprimovat vše, Přejmenovat vše, Uložit vše ... Rychlá zpráva, Počítat vybrané e-maily...
  • Výkonné nevyžádané e-maily podle zvyku; Odeberte duplicitní e-maily a kontakty... Umožní vám dělat chytřejší, rychlejší a lepší v Outlooku.
záběr kutools outlook kutools tab 1180x121
shot kutools outlook kutools plus karta 1180x121
 
Komentáře (0)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Zatím zde nejsou žádné komentáře
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění

Sociální sítě

Copyright © 2009 - www.extendoffice.com. | Všechna práva vyhrazena. Poháněno ExtendOffice. | |. | Sitemap
Microsoft a logo Office jsou ochranné známky nebo registrované ochranné známky společnosti Microsoft Corporation ve Spojených státech a / nebo jiných zemích.
Chráněno Sectigo SSL