Resources For IT Professionals
Post an article
Wikis - Page Details
  • First published by (eMVP, Microsoft Community Contributo)
  • When: 7 Jan 2012 9:05 AM
  • Last revision by (eMicrosoft Partne)
  • When: 1 Aug 2013 10:33 AM
  • Revisions: 6
  • Comments: 7
Options
RSSSubscribe to Article (RSS)
Can You Improve This Article?
Positively! Click Sign In to add the tip, solution, correction or comment that will help other users.

Report inappropriate content using these instructions.
Wiki  >  TechNet Articles  >  How to Print Email without the Default Fields

How to Print Email without the Default Fields

How to Print Email without the Default Fields

This topic is a how to.
Please keep it as clear and simple as possible. Avoid speculative discussions as well as a deep dive into underlying mechanisms or related technologies.

Email message when printed from Outlook always contain fields:

•    From
•    Sent
•    To
•    CC
•    Subject
•    Attachments

Additionally the attachment icons resembling the type of the file are also on the printout. MS Outlook unfortunately does not have a setting allowing to choose which of those fields are printed or not.

The macro below prints the email without chosen fields and the attachment information. Unfortunately fields From and Sent are always printed.

To remove fields of your choice simply delete the corresponding part of the code below.

Sub PrintWithoutHeaders()   
    Dim oMail
    For Each oMail In Application.ActiveExplorer.Selection
        oMail.Copy()
        ' Remove TO
        oMail.To = ""
        ' Remove CC
        oMail.CC = ""
        ' Remove SUBJECT
        oMail.Subject = ""
        ' Remove ATTACHMENTS
        For nIndex = oMail.Attachments.Count To 1
            oMail.Attachments.Remove(nIndex)
        Next
        oMail.PrintOut()
        oMail.Delete()
    Next
End Sub

(c) Shon Oskar 
© All rights reserved. No part or whole of this article may not be reproduced or published without prior permission.
Original article was published but its link no longer works
, , , , [Edit tags]
Leave a Comment
  • Please add 1 and 7 and type the answer here:
  • Post
Wiki - Revision Comment List(Revision Comment)
Sort by: Published Date | Most Recent | Most Useful
Comments
  • 1 Aug 2013 10:30 AM

    Richard Mueller edited Revision 1. Comment: Remove (en-US) from title, add language tag, added other tags

  • 1 Aug 2013 10:31 AM

    Richard Mueller edited Revision 2. Comment: Modified title casing

  • 1 Aug 2013 10:32 AM

    Naomi  N edited Revision 3. Comment: Typos

  • 1 Aug 2013 10:33 AM

    Naomi  N edited Revision 4. Comment: Link to the published article produces an error now

  • 7 Jan 2012 10:25 AM

    Luigi Bruno edited Original. Comment: Added the "How to" Wiki template.

Page 1 of 1 (5 items)
Wikis - Comment List
Sort by: Published Date | Most Recent | Most Useful
Posting comments is temporarily disabled until 10:00am PST on Saturday, December 14th. Thank you for your patience.
Comments
  • Posted by
    on 1 Aug 2013 10:30 AM

    Richard Mueller edited Revision 1. Comment: Remove (en-US) from title, add language tag, added other tags

  • Posted by
    on 1 Aug 2013 10:31 AM

    Richard Mueller edited Revision 2. Comment: Modified title casing

  • Posted by
    on 1 Aug 2013 10:32 AM

    Naomi  N edited Revision 3. Comment: Typos

  • Posted by
    on 1 Aug 2013 10:33 AM

    Naomi  N edited Revision 4. Comment: Link to the published article produces an error now

  • Posted by
    on 7 Jan 2012 9:40 AM

    Why don't adding this page in the Development Portal?

  • Posted by
    on 7 Jan 2012 10:02 AM

    I'm New in town ;] just started.

    Write me a link, I'll look around to do it.

  • Posted by
    on 7 Jan 2012 10:25 AM

    Luigi Bruno edited Original. Comment: Added the "How to" Wiki template.

Page 1 of 1 (7 items)