共用方式為

(Project) 的 Application.DateSubtract 方法

  • 發行項

傳回依指定工期排在另一個日期之前的自動排程任務日期和時間。

語法

expression。 DateSubtract( _FinishDate_, _Duration_, _Calendar_ )

expression 代表 Application 物件的變數。

參數

名稱 必要/選用 資料類型 描述
FinishDate 必要 Variant 工期結束的日期。
Duration 必要 Variant 從完成日期中扣除的工期。
Calendar 選用 Object 資源、任務或基準行事曆物件。 預設值為使用中專案的行事曆。

傳回值

Variant

註解

若要從手動排程任務 (使用可以包含非工作時間的有效行事曆進行排程) 的日期減去工期，請使用 EffectiveDateSubtract 屬性。

範例

下面範例顯示一個三天工期的任務的開始日期。該任務結束於 7/13/97 5:00 P.M.。

Sub FindDuration() 
 MsgBox DateSubtract("7/13/02 5:00 PM", "3d") 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。