共用方式為

Outlook (的 CalendarView 物件)

  • 發行項

代表以行事曆格式顯示 Outlook 項目的檢視。

註解

CalendarView 物件衍生自 View 物件，能讓您建立可自訂的檢視，以便在行事曆中使用各種不同的模式來顯示 Outlook 項目。

Outlook 提供數個內建 CalendarView 物件，並且您也可以建立自訂 CalendarView 物件。 使用Views集合的Add方法，將新的CalendarView新增至Folder物件。 使用 Standard 屬性來判斷現有的 CalendarView 物件是內建還是自訂。

依據想要顯示 Outlook 項目的版面配置及期間，CalendarView 物件支援幾種不同的檢視模式。 使用 CalendarViewMode 屬性可設定檢視模式、 使用 StartField 屬性來指定包含開始日期的 Outlook 專案屬性，以及使用 EndField 屬性來指定 Outlook 專案屬性，其中包含要顯示之 Outlook 專案的結束日期。

如果您將 CalendarViewMode 屬性設定為 olCalendarViewMonth 以外的其他值，則可以使用 DayWeekFont 和 DayWeekTimeFont 屬性來設定在檢視中用於顯示日、日期及時間標籤的字型。 使用 DayWeekTimeScale 來設定用來在檢視中顯示 Outlook 專案的時間刻度。 如果將 CalendarViewMode 設定為 olCalendarViewMultiDay，可以使用 DaysInMultiDayMode 屬性決定要在檢視中顯示的天數。

如果您將 CalendarViewMode 設定為 olCalendarViewMonth，則可以使用 MonthFont 屬性來設定用於顯示月及日標籤的字型，並且使用 MonthShowEndTime 指出是否要在檢視中顯示結束時間。

您還可以設定 Outlook 項目在 CalendarView 物件中的顯示方式。 使用 BoldSubjects 屬性來指出 Outlook 專案的主旨是否以粗體顯示，並使用 BoldDatesWithItems 屬性來指出包含 Outlook 專案的日期導覽器中的日期是否以粗體顯示。 使用 Filter 屬性來判斷要在檢視中顯示哪些 Outlook 專案。

每個 CalendarView 物件的定義都會以可延伸標記語言 (XML) 格式儲存。 使用 XML 屬性來處理 CalendarView 物件的 XML 定義。

使用 Apply 方法，將對 CalendarView 物件所做的任何變更套用至目前的檢視。 使用 Save 方法可保存對 CalendarView 物件所做的任何變更。 使用 LockUserChanges 屬性可允許或防止變更檢視的使用者介面。

您可以變更內建的 CalendarView 物件，但無法刪除它們。 使用 Delete 方法可刪除自訂 CalendarView 物件。 使用 Reset 方法，將內建 CalendarView 物件的屬性重設為其預設值。

範例

下列的 Visual Basic for Applications (VBA) 範例將目前的 CalendarView 物件設定為在檢視內顯示單一日期 (使用 8 點的 Verdana 字型顯示項目、16 點的 Verdana 字型顯示時間值) 和 [工作] 標頭。

Sub ConfigureDayViewFonts() 
 Dim objView As CalendarView 
 
 ' Check if the current view is a calendar view. 
 If Application.ActiveExplorer.CurrentView.ViewType = _ 
 olCalendarView Then 
 
 ' Obtain a CalendarView object reference for the 
 ' current calendar view. 
 Set objView = _ 
 Application.ActiveExplorer.CurrentView 
 
 With objView 
 ' Set the calendar view to show a 
 ' single day. 
 .CalendarViewMode = olCalendarViewDay 
 
 ' Set the DayWeekFont to 8-point Verdana. 
 .DayWeekFont.Name = "Verdana" 
 .DayWeekFont.Size = 8 
 
 ' Set the DayWeekTimeFont to 16-point Verdana. 
 .DayWeekTimeFont.Name = "Verdana" 
 .DayWeekTimeFont.Size = 16 
 
 ' Save the calendar view. 
 .Save 
 End With 
 End If 
End Sub

另請參閱

Outlook 物件模型參考CalendarView 物件成員

支援和意見反應

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