Свойство Exception.Shift4 (Project)

Возвращает объект Shift, представляющий четвертую рабочую смену в исключении календаря для дня, месяца, периода, дня недели или в течение года. Shift только для чтения.

Синтаксис

выражение. Shift4

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

Пример

В следующем примере по пятницам планируется полдня работы путем создания смены с 8 утра до полудня.

Sub HalfDayFridays() 

 

 With ActiveProject.Calendar.WeekDays(pjFriday) 

 .Shift1.Start = #8:00:00 AM# 

 .Shift1.Finish = #12:00:00 PM# 

 .Shift2.Clear 

 .Shift3.Clear 

 End With 

 

End Sub

См. также

Объект exception

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

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