Método Application.ConsolidateProjects (Project)
Exibe os dados de um ou mais projetos em uma única janela.
Sintaxe
expression. ConsolidateProjects
( _Filenames_
, _NewWindow_
, _AttachToSources_
, _PoolResources_
, _HideSubtasks_
, _openPool_
, _UserID_
, _Password_
)
expressão Uma variável que representa um Aplicativo objeto.
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
Filenames | Opcional | String | Um ou mais nomes de arquivo ou projetos a serem consolidados. |
NewWindow | Opcional | Boolean | True se os projetos são inseridos (consolidados) em um novo projeto. False se os projetos são inseridos no projeto ativo no ponto de seleção. O valor padrão é False. |
AttachToSources | Opcional | Boolean | True se as alterações no projeto consolidado afetam os projetos de origem. O valor padrão é True. |
PoolResources | Opcional | Variantes | O argumento PoolResources é ignorado no Project. Ele é mantido para que as macros existentes que usam esse argumento não causem erros. |
HideSubtasks | Opcional | Boolean | True se as subtarefas dos projetos especificados com nomes de arquivo estão ocultas. O valor padrão é True. |
openPool | Opcional | Long | A ação a ser tomada ao abrir um arquivo participante do compartilhamento ou pool de recursos. Ao abrir um projeto mestre, o valor para este argumento também é aplicado aos subprojetos. Pode ser uma das seguintes constantes PjPoolOpen. O valor padrão é pjPromptPool. |
UserID | Opcional | Variant | Uma ID de usuário deve usar ao acessar um projeto em um banco de dados. Se os nomes de arquivo não faz referência a um banco de dados, UserID será ignorada. |
Password | Opcional | String | Uma senha a ser usada ao abrir arquivos de projetos protegidos por senha. Se Password estiver incorreta ou for omitida e for necessária para abrir o arquivo, a senha será solicitada ao usuário. |
Valor de retorno
Boolean
Comentários
Para especificar que um projeto consolidado deve ser inserido como somente leitura, adicione "(R/O)" ao nome do arquivo no argumento Filenames .
Exemplo
O exemplo a seguir cria um projeto consolidado, imprime um relatório e fecha o projeto consolidado sem salvá-lo.
Sub ConsolidatedReport()
ConsolidateProjects Filenames:="Project1.mpp" & ListSeparator & "Project2.mpp", NewWindow:=True
ReportPrint Name:="Critical Tasks"
FileClose Save:=pjDoNotSave
End Sub
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.