如何在Outlook中延遲傳送會議邀請？

通常，您可以使用延遲傳送功能來在特定時間而不是立即傳送郵件。但是，有時您希望像延遲傳送郵件一樣延遲傳送會議邀請。那麼，如何在Outlook中按需要的時間傳送會議邀請呢？

使用VBA代碼在Outlook中延遲傳送會議邀請

使用VBA代碼在Outlook中延遲傳送會議邀請

也許，在Outlook中沒有直接的方法可以延遲會議邀請，但以下VBA代碼可以幫助您，請按照以下步驟操作：

1. 首先，您應該建立一個新項目。在新的任務視窗中：

(1.) 指定會議的主題、開始日期和結束日期；

(2.) 設定您想傳送會議邀請的提醒日期和時間；

(3.) 根據需要輸入會議訊息。

2. 建立任務後，請點擊「 保存並關閉」選項以關閉此視窗。

3. 然後，按住 ALT + F11 鍵打開 Microsoft Visual Basic for Applications 視窗。

4. 在 Microsoft Visual Basic for Applications 視窗中，雙擊 Project1(VbaProject.OTM) 窗格中的 ThisOutlookSession 以打開模組，然後將以下代碼複製並粘貼到空白模組中。

VBA代碼：延遲傳送會議邀請：

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

注意：在上述代碼中：Meeting test 是您在第一步中為會議建立的主題；並且，您應該更改收件人地址、會議地點、開始時間和會議持續時間 為您自己的信息。

5. 保存並關閉代碼，然後重新啟動Outlook以使此代碼生效。

6. 從現在開始，當任務提醒在您設定的特定時間彈出時，Outlook將自動發送會議邀請。

---

最佳辦公室生產力工具

最新消息：Kutools for Outlook 推出免費版本！

體驗全新 Kutools for Outlook，超過100項精彩功能！立即下載！

🤖 Kutools AI ：採用先進的AI技術輕鬆處理郵件，包括答覆、摘要、優化、擴充、翻譯及撰寫郵件。

📧 郵件自動化：自動回覆（支援POP及IMAP） / 排程發送郵件 / 發送郵件時根據規則自動抄送密送 / 自動轉發（高級規則） / 自動添加問候語 / 自動分割多收件人郵件為個別郵件 ...

📨 郵件管理：撤回郵件 / 根據主題等方式阻止詐騙郵件 / 刪除重複郵件 / 高級搜索 / 整合文件夾 ...

📁 附件專業工具：批量保存 / 批量拆離 / 批量壓縮 / 自動保存 / 自動拆離 / 自動壓縮 ...

🌟 介面魔法：😊更多精美與酷炫表情符號 /重要郵件來臨時提醒 / 最小化 Outlook 而非關閉 ...

👍 一鍵便利：帶附件全部答復 / 防詐騙郵件 / 🕘顯示發件人時區 ...

👩🏼‍🤝‍👩🏻 聯絡人與日曆：從選中郵件批量添加聯絡人 / 分割聯絡人組為個別組 / 移除生日提醒 ...

以您偏好的語言使用 Kutools，支援英語、西班牙語、德語、法語、中文及超過40種其他語言！

只需點擊一次，即可立即解鎖 Kutools for Outlook。別等了，現在下載提升您的工作效率！

Kutools for Outlook 功能清單立即下載前往購買

🚀 一鍵下載 — 獲取全部 Office 插件

強力推薦：Kutools for Office（5合1）

一鍵下載五個安裝程式，包括 Kutools for Excel, Outlook, Word, PowerPoint及 Office Tab Pro。 立即下載！

• ✅ 一鍵便利：一次操作即可下載全部五套安裝包。
• 🚀 隨時處理任何 Office 任務：安裝您需求的插件，隨時隨地。
• 🧰 包含：Kutools for Excel / Kutools for Outlook / Kutools for Word / Office Tab Pro / Kutools for PowerPoint

套件介紹 ⬇下載套件 💳 購買套件