Erstellen eines Termins als Besprechung im Kalender

In diesem Thema wird die Visual Basic for Applications (VBA)-Prozedur , gezeigt, CreateApptdie programmgesteuert einen Termin erstellt, verschiedene Eigenschaften festlegt und den Termin sendet, um eine Besprechung anzufordern. Die Prozedur CreateAppt verwendet die CreateItem -Methode zum Erstellen eines AppointmentItem -Objekts. Hiermit wird die MeetingStatus -Eigenschaft von AppointmentItem auf olMeeting festgelegt, um den Termin als Besprechungsanfrage zu kennzeichnen. Danach wird das Terminelement angezeigt und gesendet.

Sub CreateAppt() 
 Dim myItem As Object 
 Dim myRequiredAttendee, myOptionalAttendee, myResourceAttendee As Outlook.Recipient 
 
 Set myItem = Application.CreateItem(olAppointmentItem) 
 myItem.MeetingStatus = olMeeting 
 myItem.Subject = "Strategy Meeting" 
 myItem.Location = "Conf Rm All Stars" 
 myItem.Start = #9/24/2009 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("Conf Rm All Stars") 
 myResourceAttendee.Type = olResource 
 myItem.Display 
 myItem.Send 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.