How to Batch Import Birthdays from Excel Worksheet to Outlook Calendar

If you have a list of birthday information in an Excel worksheet, you may want to import these birthdays into your Outlook calendar as events. This article will guide you to accomplish it in quick time.

From the previous article — “How to Batch Import Birthdays from Excel to the Corresponding Outlook Contacts”, you can learn the means to add birthday info in an Excel to relevant contacts. Similar to that, some users would like to create Outlook birthday events from the data in an Excel sheet. Looking at this issue, we will expose another piece of VBA code to help you get it with ease.
Batch Import Birthdays from Excel to Outlook Calendar

— Frist of all, open the specific Excel file. My sample Excel file is as shown in the following figure.
— Then, press “Alt + F11” to trigger Excel VBA editor.
— Next, in the new “Microsoft Visual Basic for Applications” window, enable the reference to “MS Outlook Object Library” according to “How to Add an Object Library Reference in VBA”.
— After that, copy the following VBA code into a project or module.

Sub ImportBirthdaysToCalendar()
Dim objWorksheet As Excel.Worksheet
Dim nLastRow As Integer
Dim objOutlookApp As Outlook.Application
Dim objCalendar As Outlook.Folder
Dim objBirthdayEvent As Outlook.AppointmentItem
Dim objRecurrencePattern As Outlook.RecurrencePattern

‘Get the specific sheet
Set objWorksheet = ThisWorkbook.Sheets(1)
nLastRow = objWorksheet.Range(“A” & objWorksheet.