Compartilhar via


Objeto Projects (Project)

Contém uma coleção de objetos do Project.

Exemplo

Usando o objeto Project

Use projetos (Index), onde índice é o número do projeto índice ou nome do projeto, para retornar um único objeto Project. O exemplo a seguir alterna entre todos os projetos abertos, memoriza o nome completo de cada e exibe os resultados.

Dim Temp As Long, Names As String 

 

For Temp = 1 To Projects.Count 

 Projects(Temp).Activate 

 Names = Names & Projects(Temp).FullName & vbCrLf 

Next Temp 

 

MsgBox Names

Usando a coleção Projects

Use a propriedade de projetos para retornar uma coleção Projects. O exemplo seguinte conta o número de projetos abertos.

Application.Projects.Count

Devido a coleção Projects ser um objeto de nível superior, o exemplo a seguir é funcionalmente idêntico ao anterior.

Projects.Count

Use o método Add para adicionar um objeto Project à coleção Projects. O exemplo a seguir cria um novo projeto sem solicitar informações sobre o projeto.

Projects.Add False

Métodos

Nome
Adicionar
CanCheckOut
CheckOut

Propriedades

Nome
Aplicativo
Count
Item
Parent

Confira também

Modelo de objeto do projeto

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.