How to Batch Change the Forms of Multiple Outlook Items

Perhaps you create a custom form for a specific type of item, such as contact. Then, you want to change the old forms of multiple such items to the new form. Hence, in this article, we will introduce a quick approach to realize it.

In Outlook, you can’t find a direct function to change an existing item’s form, not to mention batch modifying the forms of multiple items. However, fortunately, it can be achieved with a bit of scripting. In the followings, we will share a piece of VBA codes with you. It allows you to get it in one go.

Batch Change the Forms of Multiple Outlook Items

Batch Change the Forms of Multiple Outlook Items

  1. To begin with, start your Outlook application.
  2. Then, press “Alt + F11” key buttons to trigger VBA editor.
  3. In the new displaying window, copy the following code into a module that is not being used.
Sub BatchChangeCustomForms_MultipleOutlookItems()
    Dim objSelection As Outlook.Selection
    Dim i As Long
    Dim objItem As Object
    Dim strOldForm, strNewForm As String
 
    'Get all selected items
    Set objSelection = Outlook.Application.ActiveExplorer.Selection
 
    If objSelection Is Nothing Then
       MsgBox "No item is selected.", vbExclamation + vbOKOnly
    Else
       'Input the name of new form
       strNewForm = InputBox("Enter the name of new form:", , "IPM.Contact.Custom")
       If strNewForm <> "" Then
          For i = objSelection.Count To 1 Step -1
              Set objItem = objSelection(i)
              strOldForm = objItem.MessageClass
 
              'Assign the new form to the selected items
              If LCase(strNewForm) <> LCase(strOldForm) Then
                 objItem.MessageClass = strNewForm
                 objItem.Save
              End If
         Next
 
         MsgBox "Completed!", vbInformation + vbOKOnly
      End If
    End If
End Sub

VBA Code - Batch Change the Forms of Multiple Outlook Items

  1. After that, for convenient access at later time, you had better add this macro to Quick Access Toolbar as per “How to Run VBA Code in Your Outlook“.
  2. Ultimately, you can attempt it like the steps below. Here I take contacts as an example.
  • First off, select multiple contacts.
  • Then, click the macro button in the Quick Access Toolbar.Run Macro on Selected Contacts
  • Later, a new dialog box will pop up, in which you need to enter the name of the new form, such as “IPM.Contact.Custom”.Enter New Form Name
  • Macro will finish with a prompt of “Completed”.
  • When you get this message, open the selected contacts. Their forms must have been changed to the new one.Items in New Form

Cope with Outlook Problems Effectively

As we all know, Outlook is unable to be exempt from errors and corruption. Thus, it is an arduous task to protect your Outlook data. Majority of regular users have ever suffered Outlook issues, ranging from small glitches to severe crashes. With no doubt, crashes must be the worst cases. In that situation, chances are that the Outlook PST file may get corrupt. At that point, the inbuilt fix tool will be not a lot of help. What you can resort to is either specialized PST fix tool, like DataNumen Outlook Repair, or expert recovery service. Both of them can fix Outlook errors like a cork.

Author Introduction:

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

Comments are closed.