AppointmentItem.Duration Property (Outlook)

Office 2013 and later

Contribute to this content

Use GitHub to suggest and submit changes. See our guidelines for contributing to VBA documentation.

Returns or sets a Long indicating the duration (in minutes) of the AppointmentItem. Read/write.

expression .Duration

expression A variable that represents an AppointmentItem object.

This Visual Basic for Applications example uses Application.CreateItem to create an appointment and uses AppointmentItem.MeetingStatus to set the meeting status to "Meeting" to turn it into a meeting request with both a required and an optional attendee.

Sub ScheduleMeeting() 
 Dim myItem as AppointmentItem 
 Dim myRequiredAttendee As Recipient 
 Dim myOptionalAttendee As Recipient 
 Dim myResourceAttendee As Recipient 
 Set myItem = Application.CreateItem(olAppointmentItem) 
 myItem.MeetingStatus = olMeeting 
 myItem.Subject = "Strategy Meeting" 
 myItem.Location = "Conference Room B" 
 myItem.Start = #9/24/2002 1:30:00 PM# 
 myItem.Duration = 90 
 Set myRequiredAttendee = myItem.Recipients.Add ("Nate Sun") 
 myRequiredAttendee.Type = olRequired 
 Set myOptionalAttendee = myItem.Recipients.Add ("Kevin Kennedy") 
 myOptionalAttendee.Type = olOptional 
 Set myResourceAttendee = myItem.Recipients.Add("Conference Room B") 
 myResourceAttendee.Type = olResource 
End Sub