2 Easy Methods to Only Print the Normal or Internet Header of an Outlook Email

Outlook Data Recovery, Outlook Solutions April 3, 2018

At times, you need to only print the normal or internet header of an Outlook email. Now, this post will share you 2 quick and simple approaches.

From the previous article – “2 Tips to Print an Outlook Email without Header & Username“, you can learn the easy ways to print only the message body of a mail. But, sometimes, you may want to just print the normal or internet header of an email, namely the sender, recipients and other information of the email. So, hereinafter, we’ll teach you 2 methods to get it.

Method 1: Print Manually

Print Internet Header

  1. At first, double click the email to open it in Message window.
  2. Then, go to “File” menu.
  3. On “Info” tab, click “Properties” button.Mail Properties
  4. In the “Properties” window, click into the “Internet headers” box.
  5. Next, press “Ctrl + A” to select all and “Ctrl + C” to copy the full headers.Copy Internet Headers
  6. Later, create an email new mail and press “Ctrl +V” to paste the headers into body.Paste Internet Headers
  7. Finally, go to “File” > “Print” to print the new mail.

Print Normal Header

  1. To begin with, select or open the source email.
  2. Then, click “Forward” button.
  3. In the popup forwarding mail, select and remove the original mail’s message body to leave the header only, like the following screenshot.Remove Original Message Body to Leave Header Only
  4. Ultimately, print the current forwarding mail as usual.

Method 2: Print with VBA

Print Internet Header

  1. For a start, open or select the mail that you want.
  2. Then, launch Outlook VBA editor via “Alt + F11”.
  3. Next, put the following code into a module.
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 Code - Print Internet Header

  1. Lastly, click “Run” icon in toolbar.
  2. At once, the Internet header of the email will be printed out.Printed Internet Header

Print Normal Header

  1. Still in VBA editor, copy the code below into a module.
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 Code - Print Normal Header

  1. After that, run this macro.
  2. Immediately, the normal header of the email will be printed.Printed Normal Header

Watch out for Unknown Mails

Headers can expose much information of the email, including the IP addresses. If you want to identify whether an email is suspicious, the headers must be checked. To be honest, it is recommended not to trust in the emails from unknown senders in that most of them are spam and even carry malicious macros. They can attack your Outlook file with ease. If Outlook file is corrupt, you have to make efforts to attempt Outlook repair. It is quite knotty unless you resort to a professional and robust tool, such as DataNumen Outlook Repair.

Author Introduction:

Shirley Zhang is a data recovery expert in DataNumen, Inc., which is the world leader in data recovery technologies, including SQL Server corruption and outlook repair software products. For more information visit www.datanumen.com

Comments are closed.