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

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

Синтаксис

выражение. Shift2

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

Пример

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

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

См. также

Объект исключения

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

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