Project) (Period.Shift1 属性
获取一个 班次 对象,该对象表示在一段时间的第一个工作班次。 只读的 班次 。
expression。 Shift1
表达 一个代表 Period 对象的变量。
下面的示例通过创建上午 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
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。