Compartilhar via


Propriedade Exception.Shift4 (Project)

Obtém um objeto Shift representando do quarto turno de trabalho em uma exceção de calendário para um dia, mês, período weekday ou ao longo de um ano. Somente leitura Shift.

Sintaxe

expression. Shift4

Expressão Uma variável que representa um objeto Exception .

Exemplo

O exemplo a seguir agenda meio período de trabalho nas sextas-feiras criando um turno das 8:00 ao meio-dia.

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

Confira também

Objeto Exception

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.