Exception.Shift2 属性 (Project)
获取一个 班次 对象,该对象代表日历例外日期的日、 月、 期、 工作日,或在整个一年中第二个工作班次。 只读的 班次 。
语法
expression。 Shift2
表达 一个代表 Exception 对象的变量。
示例
下例通过创建从上午 8 点到中午 12 点的班次,排定星期五半天的任务。
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 支持和反馈,获取有关如何接收支持和提供反馈的指南。