链接的任务之间延隔时间的工期。 读/写 Variant。
语法
expression。 Lag
表达 一个代表 TaskDependency 对象的变量。
备注
若要指定任务间的前置重叠时间,请使用负值。 除非另有指定的字符串值默认为工作日。 非字符串值被解释为分钟。
示例
若要使用 SetLagWeeks 宏,请创建两个任务,任务 2 链接到任务 1 的位置。 运行该宏时,“即时”窗口会显示 4800 和 9,其中延隔时间为 4800 分钟,而延隔类型为 9 (pjWeeks)。
Sub SetLagWeeks()
Dim tsk As Task
Set tsk = ActiveProject.Tasks(2)
tsk.TaskDependencies(1).Lag = "2w"
Debug.Print tsk.TaskDependencies(1).Lag
Debug.Print tsk.TaskDependencies(1).LagType
End Sub
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。