Outlook doesn’t allow you to print a contact’s notes only, not to mention batch printing the notes of multiple contacts. Therefore, in this article, we will guide to realize this function with VBA code.
By default, when you print an Outlook contact in “Memo Style”, all the general information of this contact will be printed out, including the name, company, job title, email address, various phone numbers and notes, etc. Yet, at times, you may only want to print the “Notes” of the contact. In this case, you have to seek other means. Thereinafter, we will teach you to print out the notes of multiple contacts in a jiffy.
Print the Notes of Multiple Outlook Contacts
- To begin with, launch Outlook program.
- Then, in main window, get into Outlook VBA editor by “Alt + F11” keys.
- Next, in the new window, you ought to first enable “MS Word Object Library”, which you can refer to the previous article – “How to Add an Object Library Reference in VBA“.
- After that, copy and paste the following VBA code into an unused module.
Sub PrintMultipleContactNotesOnly() Dim objSelection As Outlook.Selection Dim i As Long Dim objContact As Outlook.ContactItem Dim objWordApp As Word.Application Dim objTempDocument As Word.Document Dim strDocumentData As String 'Get selected contacts Set objSelection = Outlook.Application.ActiveExplorer.Selection Set objWordApp = CreateObject("Word.Application") objWordApp.Visible = True For i = objSelection.Count To 1 Step -1 If objSelection(i).Class = olContact Then 'Input the contact Notes into a document Set objContact = objSelection(i) Set objTempDocument = objWordApp.Documents.Add strDocumentData = objContact.FullName & vbCr & vbCr & objContact.Body objTempDocument.Range(0, 0).InsertAfter strDocumentData 'Print the document objTempDocument.PrintOut objTempDocument.Close False End If Next objWordApp.Quit End Sub
- Later, exit the VBA editor and add this macro to Quick Access Toolbar, which has been taught in the post – “How to Run VBA Code in Your Outlook“.
- Afterwards, you can go to the Contacts folder.
- Eventually, select all the original contacts whose notes you want to print and run macro by the new button in Quick Access Toolbar.
- When macro completes, the notes of the selected contacts will be printed out.
What to Do in the Event of Outlook Crash
Have you ever encountered Outlook crash? Generally, at best, everything may still be fine. Nevertheless, at worst, crash can straightly result in catastrophic Outlook data damage. At that point, you’ll be required to attempt PST data recovery. Now, if you’ve kept an updated Outlook data backup, you can just revert to the backup. But, if there is not an effective backup, you have to take recourse to a robust and trustworthy external fix tool, such as DataNumen Outlook Repair. It can help you get back maximum data from damaged Outlook file.
Shirley Zhang is a data recovery expert in DataNumen, Inc., which is the world leader in data recovery technologies, including corrupt mdf and outlook repair software products. For more information visit www.datanumen.com