Objeto Projects (Project)
Contém uma coleção de objetos do Project.
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
Nome |
---|
Adicionar |
CanCheckOut |
CheckOut |
Nome |
---|
Aplicativo |
Count |
Item |
Parent |
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.