共用方式為


TaskDependency.Lag 屬性 (專案)

連結任務之間的延遲時間的持續時間。 讀取/寫入 Variant

語法

expressionLag

一個代表 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 支援與意見反應