Свойство CalendarView.DayWeekTimeScale (Outlook)
Возвращает или задает константу OlDayWeekTimeScale , представляющую масштаб, используемый для представления периодов времени в объекте CalendarView . Для чтения и записи.
Синтаксис
выражение. DayWeekTimeScale
Выражение Переменная, представляющая объект CalendarView .
Пример
В следующем примере Visual Basic для приложений (VBA) создается новый объект CalendarView в папке Calendar по умолчанию, а затем настраивается для отображения 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
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.