如何在 Outlook 中列印不含收件人的郵件?
在 Outlook 中列印郵件時,郵件標頭通常會包含一長串的收件人列表,佔用不必要的空間。為了節省紙張並簡化列印輸出,本指南介紹了一個 VBA 腳本,讓您可以在 Outlook 中列印不含收件人的郵件。
使用 VBA 列印不含收件人的郵件
按照以下步驟使用 VBA 來列印郵件,同時忽略收件人:
1. 選擇要列印且不含收件人的郵件,然後按 Alt + F11 打開 Microsoft Visual Basic for Applications 窗口。
2. 點擊「插入」>「模組」,然後將以下 VBA 程式碼粘貼到模組窗口中。
VBA:列印不含收件人的郵件
Public Sub PrintWithoutRecipient()
Dim oItem As Outlook.MailItem
Dim i As Long
For i = 1 To Application.ActiveExplorer.Selection.Count
Set oItem = Application.ActiveExplorer.Selection.Item(i)
oItem.To = ""
oItem.CC = ""
oItem.PrintOut
oItem.Close olDiscard
Set oItem = Nothing
Next
End Sub
3. 按下「F5」鍵或點擊「執行」按鈕以執行 VBA。
現在,所選郵件將在不顯示其收件人的情況下列印出來。
🖨️ 輕鬆列印帶有密件抄送收件人的已發送郵件
在 Outlook 中,列印已發送郵件時,通常會排除「密件抄送」欄位。透過 Kutools for Outlook 的「高級列印」功能,您可以列印帶有密件抄送收件人的已發送郵件,自訂郵件標頭,甚至可以加入背景,增添專業感。

相關文章
最佳辦公室生產力工具
最新消息:Kutools for Outlook 推出免費版本!
體驗全新 Kutools for Outlook,超過100項精彩功能!立即下載!
🤖 Kutools AI :採用先進的AI技術輕鬆處理郵件,包括答覆、摘要、優化、擴充、翻譯及撰寫郵件。
📧 郵件自動化:自動回覆(支援POP及IMAP) / 排程發送郵件 / 發送郵件時根據規則自動抄送密送 / 自動轉發(高級規則) / 自動添加問候語 / 自動分割多收件人郵件為個別郵件 ...
📨 郵件管理:撤回郵件 / 根據主題等方式阻止詐騙郵件 / 刪除重複郵件 / 高級搜索 / 整合文件夾 ...
📁 附件專業工具:批量保存 / 批量拆離 / 批量壓縮 / 自動保存 / 自動拆離 / 自動壓縮 ...
🌟 介面魔法:😊更多精美與酷炫表情符號 /重要郵件來臨時提醒 / 最小化 Outlook 而非關閉 ...
👍 一鍵便利:帶附件全部答復 / 防詐騙郵件 / 🕘顯示發件人時區 ...
👩🏼🤝👩🏻 聯絡人與日曆:從選中郵件批量添加聯絡人 / 分割聯絡人組為個別組 / 移除生日提醒 ...
以您偏好的語言使用 Kutools,支援英語、西班牙語、德語、法語、中文及超過40種其他語言!
只需點擊一次,即可立即解鎖 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