2 Ways to Batch Remove Birthdays and Anniversaries from All Contacts in Your Outlook

Some users would like to remove the birthdays and anniversaries from all the contacts in their Outlook. This article will introduce 2 methods to realize this in batches.

Since Outlook will auto add the corresponding birthday and anniversary events to calendar when birthday and anniversary info is added to contacts, some users would like to directly remove such info from all contacts after deleting the events. Thereinafter, we’ll share you 2 methods, both of which can remove birthdays and anniversaries from all contacts in bulk.

Batch Remove Birthdays and Anniversaries from All Contacts

Method 1: Batch Remove via Drag & Drop

  1. At the very beginning, access a certain Contacts folder.
  2. Then, switch to “View” tab and click “Change View”.
  3. From the drop down list, choose “List”.
  4. Next, click the adjacent “View Settings” button.
  5. In the popup “Advanced View Settings: List” dialog box, click on “Group By” button.
  6. Subsequently, in the new dialog box, take the following steps:
  • First, choose “All Contact fields” in the drop down list of “Select available fields from:” at the bottom.
  • Then, select “Birthday” from the list of “Group items by”.
  • Lastly, click a series of “OK” until all dialog boxes are closed.Group Items by Birthday
  1. After returning to the contact list, you can see all the contacts are grouped by their birthday.
  2. If there isn’t any contact that is in “Birthday: None” group, you should firstly remove a contact’ birthday.
  3. Afterwards, you can drag and drop all the contacts who are in other groups to the “Birthday: None” group, like the following screenshot:Drag and Drop to "Birthday: None" Group
  4. After that, all the contacts’ birthday information has been changed to “None”.
  5. Now, you can use the same way to remove the anniversary from all contacts.

Method 2: Batch Remove via Outlook VBA

  1. First off, in the Outlook window, press the shortcut “Alt + F11” key buttons.
  2. Then, in the new “Microsoft Visual Basic for Applications” window, you need to open an unused module.
  3. Next, copy and paste the following VBA code into this module.
Sub RemoveBirthdayAnniversaryfromAllContacts()
    Dim objStores As Stores
    Dim objStore As store
    Set objStores = Outlook.Application.Session.Stores
    For Each objStore In objStores
        Call ProcessFolders(objStore.GetRootFolder.Folders)
End Sub

Sub ProcessFolders(ByVal objFolders As Folders)
    Dim objFolder As Folder
    Dim objItem As Object
    Dim objContact As ContactItem
    For Each objFolder In objFolders
        If objFolder.DefaultItemType = olContactItem Then
           For Each objItem In objFolder.Items
               If objItem.Class = olContact Then
                  Set objContact = objItem
                  On Error Resume Next
                  'Change birthday and anniversary to "None"
                  With objContact
                       .Birthday = #1/1/4501#
                       .Anniversary = #1/1/4501#
                  End With
               End If
           Call ProcessFolders(objFolder.Folders)
        End If
End Sub

VBA Code - Batch Remove Birthdays and Anniversaries from All Contacts

  1. Eventually, you can trigger this macro by pressing F5 key button.
  2. After this macro finishes, birthday and anniversary have been removed from all the contacts in all folders.

Take Adequate Precautions to Safeguard Outlook

Due to Outlook’s vulnerability, you must have known the necessity of remaining well-prepared for Outlook corruption. Unquestionably, making periodic backups is one of the most essential precautions. Also, it is prudent to get hold of a potent Outlook fix tool, like DataNumen Outlook Repair. It can minimize data corruption to its utmost.

Author Introduction:

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

Comments are closed.