共用方式為


Outlook) 的 CalendarView.DaysInMultiDayMode 屬性 (

會傳回或設定 Long 值,代表在 CalendarView 物件中顯示的連續天數。 可讀寫的。

語法

expressionDaysInMultiDayMode

表達 代表 CalendarView 物件的變數。

註解

這個屬性可以設定為從 2 到 14 範圍的值。 如果這個屬性設定為小於 2 的值,則屬性會設定為 2。 如果將這個屬性的值設定為高於 14,該屬性就會設定為 14。 此屬性的預設值為 5。

範例

下列 Visual Basic for Applications (VBA) 範例會在 [行事曆] 預設資料夾中建立新的CalendarView物件,然後將它設定為在多天模式中連續顯示 14 天,並以每小時的時間刻度顯示 Outlook 專案。

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

另請參閱

CalendarView 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應