VBA Macro to create Outlook Meeting

Question: How to create Outlook Calendar Events or meetings from Excel Sheet.

Answer: We need to VB macros to achieve this task. Here is the code snippet to do this.

Step 1: First refer the library in macros

Step 2: Try this code by changing required data.

Sub AddOutLookMeeting()


Dim myOlApp As Outlook.Application
Dim myItem As Outlook.AppointmentItem

Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.CreateItem(olAppointmentItem)

myItem.Subject = "Creating Outlook Meeting Item from Excel Macros"
myItem.Duration = 20
myItem.Body = "Body"
myItem.Subject = "Subject"
myItem.ReminderSet = True
myItem.Start = #6/24/2010 3:30:00 PM#


End Sub