Project.Application.BaselineSave.md

title	keywords	f1_keywords	ms.service	api_name	ms.assetid	ms.date	ms.localizationpriority
Application.BaselineSave method (Project)	vbapj.chm610	vbapj.chm610	project-server	Project.Application.BaselineSave	b64967fe-f029-fc32-762a-f81cac405447	06/08/2017	medium

Application.BaselineSave method (Project)

Creates a baseline plan.

Syntax

expression. BaselineSave( _All_, _Copy_, _Into_, _RollupToSummaryTasks_, _RollupFromSubtasks_, _SetDefaults_ )

expression A variable that represents an Application object.

Parameters

Name	Required/Optional	Data type	Description
All	Optional	Boolean	True if the baseline plan is set for all tasks. False if the baseline plan is set only for the selected tasks. The default value is True.
Copy	Optional	Long	The fields to copy. Can be one of the PjSaveBaselineFrom constants.
Into	Optional	Long	Where the fields should be copied. Can be one of the PjSaveBaselineTo constants.
RollupToSummaryTasks	Optional	Boolean	True if parent summary task baseline data are rolled up from selected summary tasks.
RollupFromSubtasks	Optional	Boolean	True if summary task baseline data are rolled up from subtasks.
SetDefaults	Optional	Boolean	True if the values of RollupToSummaryTasks or RollupFromSubtasks are used as default values for new projects.

Return value

Boolean

Remarks

RollupToSummaryTasks and RollupFromSubTasks will have an effect only if All is false.

Example

The following example first saves the baseline and then clears it.

Sub Baseline_Save() 
 
 Dim Result As Boolean 
 
 'Save baseline 
 Result = BaselineSave(True) 
 'Clear baseline 
 Result = BaselineClear (True) 
End Sub

[!includeSupport and feedback]