CalendarView.DayWeekFont Property (Outlook)
Published: July 16, 2012
The value of this property also represents the font used to display the day header and the minute portion of the time header when the CalendarViewMode property of the CalendarView object is set to either olCalendarViewDay, olCalendarViewMultiDay, olCalendarViewWeek, or olCalendarView5DayWeek.
The following Visual Basic for Applications (VBA) example configures the current CalendarView object to show a single day, using an 8-point Verdana font to display items and a 16-point Verdana font to display time values and the Tasks header within the view.
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