Compartilhar via


Propriedade Day.Shift1 (Project)

Obtém um objeto Shift representando do primeiro turno de trabalho em um dia. Somente leitura Shift.

Sintaxe

expression. Shift1

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

Exemplo

O exemplo a seguir agenda meio período de trabalho nas sextas-feiras criando um turno noturno de 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

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.