Объект Windows (Project)

Статья
04/07/2023

Содержит коллекцию объектов Window . Коллекция Windows для объекта Application содержит все окна в приложении, тогда как коллекция Windows для объекта Project содержит только окна в указанном проекте.

Замечания

Примечание.

Коллекция Windows поддерживается для обеспечения обратной совместимости. Мы рекомендуем использовать коллекцию Windows2 для всех новых разработок.

Примеры

Использование объекта Window

Используйте Windows ( Index), где Index — это номер индекса окна или заголовок окна, чтобы вернуть один объект Window . В следующем примере показано, как развернуть первое окно в списке окон.

Application.Windows(1).WindowState = pjMaximized

Заголовок окна — это текст, отображаемый в заголовке окна в верхней части окна, когда окно не развернуто. Заголовок также отображается в списке открытых файлов в нижней части меню Windows . Используйте свойство Caption , чтобы задать или вернуть заголовок окна. Изменение заголовка окна не приводит к изменению имени проекта. В следующем примере окно, содержащее заголовок Project1, скрывается.

If Application.Windows(1).Caption = "Project1" Then  
    Application.Windows(1).Visible = False  
End If

Использование коллекции Windows

Используйте свойство Windows , чтобы вернуть коллекцию Windows . В следующем примере каскадируются все окна, которые в настоящее время отображаются в Project .

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

Используйте метод WindowNewWindow , чтобы создать новое окно и добавить его в коллекцию. В следующем примере создается новое окно для активного проекта.

Application.WindowNewWindow

Свойства

Имя
ActiveWindow
Application
Count
Item
Parent

См. также

Объектная модель Project

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Share via