Objeto Windows (Project)
Contém uma coleção de objetos Window. A coleção Windows para o objeto Application contém todas as janelas no aplicativo, enquanto a coleção Windows do objeto Project contém somente as janelas do projeto especificado.
Comentários
Observação
[!OBSERVAçãO] A coleção Windows é mantida para compatibilidade com versões anteriores. Recomendamos que você use a coleção Windows2 para todo o desenvolvimento de novo.
Exemplos
Usando o objeto Window
Use o Windows ( Index), em que Index é o número do índice da janela ou a legenda da janela, para retornar um único objeto Window . O exemplo a seguir maximiza a primeira janela da lista de janelas.
Application.Windows(1).WindowState = pjMaximized
A legenda da janela é o texto exibido na barra de título na parte superior da janela quando a janela não estiver maximizada. A legenda também é mostrada na lista de arquivos abertos na parte inferior do menu do Windows. Use a propriedade Caption para definir ou retornar a legenda da janela. Alterar a legenda da janela não altera o nome do projeto. O exemplo a seguir oculta a janela que contém a legenda "Projeto1".
If Application.Windows(1).Caption = "Project1" Then
Application.Windows(1).Visible = False
End If
Usando a coleção Windows
Use a propriedade do Windows para retornar uma coleção Windows. O exemplo a seguir organiza em cascata todas as janelas são exibidas atualmente no projeto.
With Application.Windows
For I = 1 To .Count
.Item(I).Activate
.Item(I).Top = (I - 1) * 15
.Item(I).Left = (I - 1) * 15
Next I
End With
Use o método WindowNewWindow para criar uma nova janela e adicioná-la à coleção. O exemplo a seguir cria uma nova janela para o projeto ativo.
Application.WindowNewWindow
Propriedades
| Nome |
|---|
| ActiveWindow |
| Application |
| 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.