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.
Ativa o projeto.
Sintaxe
expressão. Ativar
expressão Uma variável que representa um objeto do Project .
Exemplo
Os exemplos a seguir ativam, respectivamente, os projetos anterior e seguinte.
Sub ProjectNext()
If ActiveProject.Index < Projects.Count Then
Projects(ActiveProject.Index + 1).Activate
Else
Projects(1).Activate
End If
End Sub
Sub ProjectPrevious()
If ActiveProject.Index > 1 Then
Projects(ActiveProject.Index - 1).Activate
Else
Projects(Projects.Count).Activate
End If
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.