2015-12-14 3 views
1

Можно ли каким-либо образом получить Outlook, чтобы показывать ежемесячный календарь, только показывающий встречи выбранной категории.Показать календарь Outlook только с выбранной категорией

я могу экспортировать календарь в таблицу и шоу пункт, в календаре, используя некоторые Delphi код, но было бы лучше, чтобы сделать это непосредственно в Outlook,

ответ

1

Это должно быть хорошее начало:

Sub ConfigureDayViewFonts() 
    Dim objView As CalendarView 
    Dim CriteRia As String 
    Dim SearchedCategory As String 

    SearchedCategory = "SearchedCategory" 

    CriteRia = "@SQL=" & Chr(34) _ 
     & "urn:schemas-microsoft-com:office:office#Keywords" _ 
     & Chr(34) & " ci_startswith '" & SearchedCategory & "'" 

    ' 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 = olCalendarViewMonth 
      .Filter = CriteRia 

      ' Save the calendar view. 
      '.Save 
     End With 
    End If 
End Sub 

Смотрите этот ответ и его предложение сделать настроить фильтр самостоятельно: https://stackoverflow.com/a/14152882/4628637

+1

спасибо за вход - который помог мне в правильном направлении, чтобы настроить фильтр, на котором показаны записи, которые я хочу, а затем распечатать его. – OZ8HP

Смежные вопросы