Shift.Clear 方法 (Project)

2023-04-07

清除一个工作班次的开始时间与完成时间。

语法

表达式。清楚

表达一个代表 Shift 对象的变量。

示例

下例通过创建上午 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 支持和反馈，获取有关如何接收支持和提供反馈的指南。