Application.ConsolidateProjects метод (Project)

Отображение данных из одного или нескольких проектов в одном окне.

Синтаксис

выражение. ConsolidateProjects( _Filenames_, _NewWindow_, _AttachToSources_, _PoolResources_, _HideSubtasks_, _openPool_, _UserID_, _Password_ )

выражение: переменная, представляющая объект Application.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Имена файлов	Необязательный	String	Одно или несколько имен файлов проектов для консолидации.
NewWindow	Необязательный	Логический	True , если проекты вставлены (консолидированы) в новый проект. Значение False , если проекты вставлены в активный проект в точке выбора. Значение по умолчанию — False.
AttachToSources	Необязательный	Логический	True , если изменения в консолидированном проекте влияют на исходные проекты. Значение по умолчанию — True.
PoolResources	Необязательный	Variant	Аргумент PoolResources игнорируется в Project. Он сохраняется, чтобы существующие макросы, использующие этот аргумент, не вызывали ошибок.
Скрытьподзадачи	Необязательный	Логический	True , если подзадачи проектов, указанных с именами файлов, скрыты. Значение по умолчанию — True.
openPool	Необязательный	Long	Действие, которое необходимо выполнить при открытии пула ресурсов или файла пула клиентов. При открытии проекта master значение этого аргумента также применяется к подпроектам. Может быть одной из следующих констант PjPoolOpen . Значение по умолчанию — pjPromptPool.
UserID	Необязательный	Variant	Идентификатор пользователя, используемый при доступе к проекту в базе данных. Если имя файла не ссылается на базу данных, то идентификатор пользователя игнорируется.
Password	Необязательный	String	Пароль для открытия защищенных паролем файлов проекта. Если пароль неверен или опущен, а файл требует пароль, пользователю будет предложено ввести пароль.

Возвращаемое значение

Boolean

Примечания

Чтобы указать, что консолидированный проект должен быть вставлен только для чтения, добавьте "(R/O)" к имени файла в аргументе Filenames .

Пример

В следующем примере создается консолидированный проект, печатается отчет и он закрывается без сохранения.

Sub ConsolidatedReport() 
    ConsolidateProjects Filenames:="Project1.mpp" & ListSeparator & "Project2.mpp", NewWindow:=True 
    ReportPrint Name:="Critical Tasks" 
    FileClose Save:=pjDoNotSave 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.