Свойство TimelineView.ShowWeekNumbers (Outlook)

Статья
04/07/2023

Возвращает или задает логическое значение, указывающее, отображаются ли метки номера недели на шкале временной шкалы для объекта TimelineView . Для чтения и записи.

Синтаксис

выражение. ShowWeekNumbers

Выражение Переменная, представляющая объект TimelineView .

Замечания

Если для этого свойства задано значение True, расположение, в котором на шкале временной шкалы для объекта TimelineView отображаются метки номера недели, зависит от значения свойства TimelineViewMode .

Значение свойства	Расположение метки
olTimelineViewDay	Отображается в верхней части шкалы временной шкалы с предварительной меткой даты.
olTimelineViewWeek	Отображается в верхней части шкалы временной шкалы с предварительной меткой недели.
olTimelineViewMonth	Отображается в нижней части шкалы временной шкалы, заменяющей метки дня и даты.

Пример

В следующем примере Visual Basic для приложений (VBA) текущий объект TimelineView настраивается для отображения элементов Outlook по месяцам с метками числа недель в нижней части шкалы временной шкалы и метками длиной не более 40 символов.

Private Sub ConfigureMonthTimelineView() 
 
 Dim objTimelineView As TimelineView 
 
  If Application.ActiveExplorer.CurrentView.ViewType = _ 
 
 olTimelineView Then 
   
 ' Obtain a TimelineView object reference for the  
 ' current timeline view. 
 
 Set objTimelineView = _ 
 
 Application.ActiveExplorer.CurrentView 
   
 ' Configure the TimelineView object so that it displays  
 ' Outlook items by month and week, displaying labels  
 ' no larger than 40 characters for Outlook items  
 ' displayed in the view. 
 
 With objTimelineView 
 
 ' Display items by month. 
 
 .TimelineViewMode = olTimelineViewMonth 
 
 ' Display week numbers. If this value is  
 ' set to False when TimelineViewMode is  
 ' set to olTimelineViewMonth, the day  
 ' numbers are displayed instead. 
 
 .ShowWeekNumbers = True 
 
 ' Display labels for Outlook items  
 ' while TimelineViewMode is set to  
 ' olTimelineViewMonth. 
 
 .ShowLabelWhenViewingByMonth = True 
 
 ' Show no more than the first 40 characters  
 ' for each Outlook item in the view. 
 
 .MaxLabelWidth = 40 
 
  ' Save and apply the view. 
 
 .Save 
 
 .Apply 
 
 End With 
 
 End If 
 
  
End Sub

См. также

Объект TimelineView

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через