Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
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
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.