Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt eine OlRecurrenceType-Konstante zurück oder legt sie fest, die die Häufigkeit der Vorkommen für das Serienmuster angibt. Lese-/Schreibzugriff.
Syntax
expression. RecurrenceType
Ausdruck Eine Variable, die ein RecurrencePattern-Objekt darstellt.
Hinweise
Sie müssen die RecurrenceType-Eigenschaft festlegen, bevor Sie andere Eigenschaften für ein RecurrencePattern-Objekt festlegen. Die RecurrencePattern -Eigenschaften, die Sie nacheinander festlegen können, hängen vom Wert von RecurrenceType ab, wie in der folgenden Tabelle dargestellt wird:
| OlRecurrenceType | Gültige RecurrencePattern-Eigenschaften |
|---|---|
| olRecursWeekly | DayOfWeekMask, Duration, EndTime, Interval, NoEndDate, Occurrences, PatternStartDate, PatternEndDate, StartTime |
| olRecursMonthly | DayOfMonth, Duration, EndTime, Interval, NoEndDate, Occurrences, PatternStartDate, PatternEndDate, StartTime |
| olRecursMonthNth | DayOfWeekMask, Duration, EndTime, Interval, Instance, NoEndDate, Occurrences, PatternStartDate, PatternEndDate, StartTime |
| olRecursYearly | DayOfMonth, Duration, EndTime, Interval, MonthOfYear, NoEndDate, Occurrences, PatternStartDate, PatternEndDate, StartTime |
| olRecursYearNth | DayOfWeekMask, Duration, EndTime, Interval, Instance, NoEndDate, Occurrences, PatternStartDate, PatternEndDate, StartTime |
Beispiel
Visual Basic für Applikationen-Beispiel verwendet GetRecurrencePattern, um das RecurrencePattern -Objekt für das neu erstellte AppointmentItem zu erhalten. Die Eigenschaften "RecurrenceType", "DayOfWeekMask", "MonthOfYear", "Instance", "Occurrences", "StartTime", "EndTime" und "Subject" werden festgelegt. Der Termin wird gespeichert und dann mit dem Muster angezeigt: "Findet am ersten Montag im Juni mit Wirkung vom 01.06.2007 bis zum 06.06.2016 von 14:00 bis 17:00 Uhr statt."
Sub RecurringYearNth()
Dim oAppt As AppointmentItem
Dim oPattern As RecurrencePattern
Set oAppt = Application.CreateItem(olAppointmentItem)
Set oPattern = oAppt.GetRecurrencePattern
With oPattern
.RecurrenceType = olRecursYearNth
.DayOfWeekMask = olMonday
.MonthOfYear = 6
.Instance = 1
.Occurrences = 10
.Duration = 180
.PatternStartDate = #6/1/2007#
.StartTime = #2:00:00 PM#
.EndTime = #5:00:00 PM#
End With
oAppt.Subject = "Recurring YearNth Appointment"
oAppt.Save
oAppt.Display
End Sub
Siehe auch
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.