CalendarView.DaysInMultiDayMode-Eigenschaft (Outlook)
Gibt zurück oder legt einen Long -Wert, der die Anzahl der aufeinander folgenden Tagen angezeigt, in dem CalendarView -Objekt darstellt. Lesen/Schreiben
Syntax
Ausdruck. DaysInMultiDayMode
Ausdruck Eine Variable, die ein CalendarView-Objekt darstellt.
Hinweise
This property can be set to a value between 2 and 14. If this property is set to a value less than 2, the property is set to 2. If the this property is set to a value greater than 14, the property is set to 14. The default value for this property is 5.
Beispiel
Im folgende Visual Basic für Applikationen (VBA) erstellt ein neues CalendarView -Objekt in den Standardordner Kalender, und klicken Sie dann so konfiguriert, dass 14 aufeinander folgende Tage in mehreren Tag Modus mit Outlook-Elemente in einer Zeitskala stündliche angezeigt.
Sub CreateTwoWeekView()
Dim objNamespace As NameSpace
Dim objFolder As Folder
Dim objView As CalendarView
' Obtain Folder object reference to the Calendar default folder.
Set objNamespace = Application.GetNamespace("MAPI")
Set objFolder = objNamespace.GetDefaultFolder(olFolderCalendar)
' Create a new CalendarView object named "Two Weeks".
Set objView = objFolder.Views.Add("Two Weeks", _
olCalendarView, _
olViewSaveOptionAllFoldersOfType)
' Configure the new CalendarView object.
With objView
' Display the view in multi-day mode.
.CalendarViewMode = olCalendarViewMultiDay
' Display 14 consecutive days in multi-day
' mode.
.DaysInMultiDayMode = 14
' Set the time scale for the view in one-hour
' intervals.
.DayWeekTimeScale = olTimeScale60Minutes
' Save and apply the new CalendarView object.
.Save
.Apply
End With
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.