如何在 Outlook 中將郵件或會議邀請附加至電子郵件？

在日常郵件往來中，使用者經常需要提供背景資訊、引用先前的討論內容，或分享相關活動詳情。雖然多數人已熟悉如何附加電腦中儲存的檔案，但 Outlook 還提供了一項實用功能：可直接將現有的電子郵件或會議邀請作為附件插入。本文將深入探討此功能的應用情境、關鍵技巧，以及確保操作順利的提示、注意事項與疑難排解建議。

• 使用項目功能將郵件或會議邀請附加至電子郵件中
• 使用「轉寄為附件」功能將郵件附加至電子郵件中
• 使用 VBA 程式碼附加 Outlook 郵件

---

使用項目功能將郵件或會議邀請附加至電子郵件中

使用「轉寄為附件」功能將郵件附加至電子郵件中

---

使用 VBA 程式碼附加 Outlook 郵件

若您需要自動將所選的 Outlook 郵件附加至新郵件，VBA 程式碼可提供高效解決方案——特別適合重複性工作流程，或處理超出內建手動功能的批次需求。此方法尤其適合進階使用者，以及經常為專案報告、法律電子蒐證或團隊歸檔而整理郵件批次的使用者。

情境分析：透過 VBA，使用者可一次選取多封郵件並執行指令碼，立即建立一封新草稿，並將所有選定郵件以 .msg 檔案形式附加其中。此功能可為管理員、合規團隊或需處理重複性多郵件任務的專業人員大幅節省寶貴時間！

重要注意事項：執行任何 VBA 指令碼前，請務必確認已授予 Outlook 巨集權限，並切勿執行來源不可信的程式碼。

執行方式：

1. 在 Outlook 中，於主郵件清單窗格選取要附加的郵件，接著按下 Alt+F11，即可開啟 Microsoft Visual Basic for Applications 視窗。

2. 在 VBA 視窗中，點選插入＞ 模組，並將下方的 VBA 程式碼複製貼上至新建立的模組中：

VBA 程式碼：將所選 Outlook 郵件以附件形式附加至新郵件

Sub AttachSelectedMailsToNewEmail()
    Dim olApp As Outlook.Application
    Dim olSelection As Selection
    Dim olMail As MailItem
    Dim olNewMail As MailItem
    Dim i As Integer
    
    On Error Resume Next
    xTitleId = "KutoolsforOutlook"
    
    Set olApp = Outlook.Application
    Set olSelection = olApp.ActiveExplorer.Selection
    Set olNewMail = olApp.CreateItem(olMailItem)
    
    For i = 1 To olSelection.Count
        Set olMail = olSelection.Item(i)
        olNewMail.Attachments.Add olMail
    Next i
    
    olNewMail.Display
    
    MsgBox "Selected messages have been attached to a new email.", vbInformation, xTitleId
    
    Set olMail = Nothing
    Set olNewMail = Nothing
    Set olSelection = Nothing
    Set olApp = Nothing
End Sub

3. 現在，按下 F5 鍵以執行程式碼。Outlook 將開啟一封新郵件視窗，並自動將所有選中項目作為附件加入其中。「KutoolsforOutlook」對話方塊會確認作業已完成，您即可立即編輯並寄出郵件！

提示與疑難排解：若程式碼無法執行，請先確認 Outlook 設定中已啟用巨集，並於執行指令碼前正確選取項目。若不慎附加重複或錯誤的郵件，請重新檢查清單檢視中的選取內容。操作完成後，務必關閉 VBA 編輯器，以避免與其他功能產生衝突。

總結建議：若您追求高效率或需客製化處理大量郵件，建議結合手動與自動化方法，以達成最佳成效！寄送附加項目前，務必確認權限設定與收件者軟體的相容性。別忘了，Kutools for Outlook 還提供多項自動化功能，助您輕鬆強化主旨列、簽名檔等作業流程！

---

相關文章