Метод Inspector.SetSchedulingStartTime (Outlook)

Задает время начала для элемента собрания в сетке "Свободная/занят" на вкладке Помощник по планированию инспектора.

Синтаксис

выражение. SetSchedulingStartTime( _Start_ )

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Start	Обязательный	Date	Начало диапазона времени, в котором на вкладке Помощник по планированию инспектора отображается время доступности для участников собрания.

Замечания

Объект, заданный свойством CurrentItem родительского объекта Inspector , должен быть AppointmentItem или MeetingItem. Вкладка Помощник по планированию должна отображаться в инспекторе, в противном случае Microsoft Outlook выдает ошибку. Если в Outlook не удается отобразить вкладку Помощник по планированию для этого типа элемента, Outlook отображает следующую ошибку: Время начала планирования можно задать только в том случае, если помощник по планированию отображается в элементе собрания.

Пример

В следующем примере кода в Microsoft Visual Basic для приложений (VBA) показано, как использовать метод SetSchedulingStartTime для задания времени начала планирования на вкладке Помощник по планированию объекта AppointmentItem. Время начала встречи устанавливается в один месяц с этого момента, а время начала планирования также устанавливается на один месяц.

Sub DemoSetSchedulingStartTime() 
 
 Dim oAppt As Outlook.AppointmentItem 
 
 Dim oInsp As Outlook.inspector 
 
 
 
 ' Create and display appointment. 
 
 Set oAppt = Application.CreateItem(olAppointmentItem) 
 
 oAppt.MeetingStatus = olMeeting 
 
 oAppt.Subject = "Test Appointment" 
 
 oAppt.Start = DateAdd("m", 1, Now) 
 
 ' Display the appointment in the Appointment tab of the inspector. 
 
 oAppt.Display 
 
 
 
 Set oInsp = oAppt.GetInspector 
 
 ' Switch to the Scheduling Assistant tab in that inspector. 
 
 oInsp.SetCurrentFormPage ("Scheduling Assistant") 
 
 ' Set the appointment start time in the Scheduling Assistant. 
 
 oInsp.SetSchedulingStartTime (DateAdd("m", 1, Now)) 
 
End Sub

См. также

Объект Inspector

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

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