Application.DateSubtract method (Project)

Returns the date and time that precedes another date by a specified duration, for an automatically scheduled task.


expression. DateSubtract( _FinishDate_, _Duration_, _Calendar_ )

expression A variable that represents an Application object.


Name Required/Optional Data type Description
FinishDate Required Variant The date used as the end of the duration.
Duration Required Variant The duration to subtract from the finish date.
Calendar Optional Object A resource, task, or base calendar object. The default value is the calendar of the active project.

Return value



To subtract a duration from a date for a manually scheduled task, which uses an effective calendar that can include non-working time, use the EffectiveDateSubtract property.


The following example displays the start date of a task that lasts three days and ends on 7/13/02 at 5:00 P.M.

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

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.