僅打印 Outlook 電子郵件的普通或 Internet 標題的 2 種簡單方法

Outlook解決方案 2025 年 9 月 29 日
立即分享：

有時，您只需要打印 Outlook 電子郵件的普通或 Internet 標題。 現在，這個 post 將與您分享 2 種快速而簡單的方法。

從上一篇文章——”2條不帶標題和用戶名的Outlook電子郵件打印提示“，您可以學習僅打印郵件正文的簡單方法。 但是，有時，您可能只想打印電子郵件的普通標題或 Internet 標題，即電子郵件的發件人、收件人和其他信息。 那麼，下面就教大家2種獲取方法。

方法 1：手動打印

打印 Internet 標題

  1. 首先，雙擊電子郵件以在消息窗口中打開它。
  2. 然後，轉到“文件”菜單。
  3. 在“信息”選項卡上，單擊“屬性”按鈕。郵件屬性
  4. 在“屬性”窗口中，單擊“Internet 標題”框。
  5. 接下來，按“Ctrl + A”全選，按“Ctrl + C”複製完整標題。複製 Internet 標頭
  6. 稍後，創建一個電子郵件新郵件並按“Ctrl + V”將標題粘貼到正文中。粘貼 Internet 標題
  7. 最後，轉到“文件”>“打印”以打印新郵件。

打印普通頁眉

  1. 首先，選擇或打開源電子郵件。
  2. 然後，單擊“前進”按鈕。
  3. 在彈出的轉發郵件中，選擇並刪除原始郵件的郵件正文，只保留標題，如下圖所示。刪除原始郵件正文以僅保留標題
  4. 最後，像往常一樣打印當前的轉發郵件。

方法 2：使用 VBA 打印

打印 Internet 標題

  1. 對於作為tart，打開或選擇您想要的郵件。
  2. 然後，通過“Alt + F11”啟動 Outlook VBA 編輯器。
  3. 接下來，將以下代碼放入模塊中。
Sub PrintFullHeaders()
    Dim objMail As Outlook.MailItem
    Dim objPropertyAccessor As Outlook.PropertyAccessor
    Dim strHeader As String
    Dim objTempMail As Outlook.MailItem
 
    Select Case Outlook.Application.ActiveWindow.Class
           Case olInspector
                Set objMail = ActiveInspector.CurrentItem
           Case olExplorer
                Set objMail = ActiveExplorer.Selection.Item(1)
    End Select
 
    'Get full headers
    Set objPropertyAccessor = objMail.PropertyAccessor
    strHeader = objPropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x007D001E")
 
    'Print headers in temp mail
    Set objTempMail = Outlook.Application.CreateItem(olMailItem)
    objTempMail.HTMLBody = "<HTML><BODY>" & strHeader & "</BODY></HTML>"
    objTempMail.PrintOut
End Sub

VBA 代碼 - 打印 Internet 標題

  1. 最後，單擊工具欄中的“運行”圖標。
  2. 電子郵件的 Internet 標題將立即打印出來。印刷的互聯網標題

打印普通頁眉

  1. 仍然在 VBA 編輯器中，將下面的代碼複製到一個模塊中。
Sub PrintShortHeaders()
    Dim objMail As Outlook.MailItem
    Dim objTempMail As Outlook.MailItem
 
    Select Case Outlook.Application.ActiveWindow.Class
           Case olInspector
                Set objMail = ActiveInspector.CurrentItem
           Case olExplorer
                Set objMail = ActiveExplorer.Selection.Item(1)
    End Select
 
    Set objTempMail = objMail.Copy
    'Remove the body, leave headers only
    objTempMail.Body = ""
    objTempMail.PrintOut
End Sub

VBA 代碼 - 打印普通標題

  1. 之後，運行這個宏。
  2. 立即，將打印電子郵件的正常標題。打印的普通頁眉

注意未知郵件

標頭可以暴露電子郵件的許多信息，包括 IP 地址。 如果您想識別電子郵件是否可疑，則必須檢查標題。 老實說，建議不要相信來自未知發件人的電子郵件ost 其中一些是垃圾郵件，甚至帶有惡意宏。 他們可以輕鬆攻擊您的 Outlook 文件。 如果 Outlook 文件損壞，您必須努力嘗試 Outlook修復. 除非您求助於專業且強大的工具，否則它會非常棘手，例如 DataNumen Outlook Repair.

作者簡介：

Shirley Zhang是的數據恢復專家 DataNumen，Inc.是數據恢復技術的全球領導者，包括 SQL Server 腐敗 和Outlook修復軟件產品。 欲了解更多信息，請訪問 萬維網。datanumen.COM

立即分享：

評論被關閉。