通过

Application.DateAdd 方法 (Project)

  • 项目

为自动计划任务返回比另一个日期晚指定工期的日期和时间。

语法

expression。 DateAdd( _StartDate_, _Duration_, _Calendar_ )

expression：表示 Application 对象的变量。

参数

名称 必需/可选 数据类型 说明
StartDate 必需 Variant 要向其添加工期的原日期。
Duration 必需 Variant 要向开始日期添加的工期。
Calendar 可选 Object 资源、任务或基准日历对象。 默认值是活动项目的日历。

返回值

Variant

说明

若要将工期添加到手动计划任务的日期（该任务使用可包含非工作时间的有效日历），请使用 EffectiveDateAdd 属性。

示例

下面的示例显示一个从 2007 年 7 月 11 日上午 8 点开始、工期为三天的自动计划任务的完成日期。

Sub FindFinishDate() 
 MsgBox Application.DateAdd(StartDate:="7/11/07 8:00 AM", Duration:="3d") 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。