Application.DateAdd 方法 (Project)
傳回依指定工期排在另一個日期後面之自動排程任務的日期和時間。
語法
expression。 DateAdd
( _StartDate_
, _Duration_
, _Calendar_
)
expression 代表 Application 物件的變數。
參數
名稱 | 必要/選用 | 資料類型 | 描述 |
---|---|---|---|
StartDate | 必要 | Variant | 要新增工期的原始日期。 |
Duration | 必要 | Variant | 要新增到開始日期的工期。 |
Calendar | 選用 | Object | 資源、任務或基準行事曆物件。 預設值為使用中專案的行事曆。 |
傳回值
Variant
註解
若要將工期新增至手動排程任務的日期,而該工作使用可包含非工作時間的有效行事曆,請使用 EffectiveDateAdd 屬性。
範例
以下範例顯示一個三天自動排程任務的完成日期,該任務開始於 7/11/07 的 8 A.M.。
Sub FindFinishDate()
MsgBox Application.DateAdd(StartDate:="7/11/07 8:00 AM", Duration:="3d")
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。
意見反應
https://aka.ms/ContentUserFeedback。
即將登場:在 2024 年,我們將逐步淘汰 GitHub 問題作為內容的意見反應機制,並將它取代為新的意見反應系統。 如需詳細資訊,請參閱:提交並檢視相關的意見反應