Returns or sets a Long indicating the duration (in minutes) of the AppointmentItem. Read/write.
Syntax
expression.Duration
expression A variable that represents an AppointmentItem object.
Example
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.
Visual Basic for Applications
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
myItem.Display
End Sub