Поделиться через

Объект Application (Project)

  • Статья

Представляет все приложение Project. Объект Application содержит:

  • Параметры и параметры для всего приложения (например, многие параметры в диалоговом окне Параметры в меню Сервис ).

  • Свойства, возвращающие объекты верхнего уровня, такие как ActiveCell, ActiveProject и т. д.

  • Методы, которые действуют на элементы на уровне приложения, такие как представления, выбор, действия редактирования и т. д.

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

Используйте свойство Application для возврата объекта Application в Project . В приведенном ниже примере применяется свойство Windows к объекту Application.

Application.Windows("Project1.mpp").Activate

Использование проекта из другого приложения: поздняя привязка

В следующем примере создается объект Приложения Microsoft Project во время выполнения, создается новый проект, добавляется задача, сохраняется проект, а затем закрывается проект . Например, скопируйте и вставьте макрос CreateProject_Late в модуль ThisDocument в редакторе Visual Basic (VBE) Word.

Примечание.

Так как приложение запрашивает библиотеку типов MSProject.Application только во время выполнения, Microsoft IntelliSense недоступен, а производительность относительно низкая с задержкой привязки. Языки сценариев, такие как JavaScript и VBScript, требуют поздней привязки. VBScript поддерживает только универсальные типы данных Object и Variant . Для повышения производительности в VBA и других скомпилированных языках следует использовать раннюю привязку, задав ссылку на библиотеку типов Project.

Sub CreateProject_Late() 
    Dim pjApp As Object 
    Set pjApp = CreateObject("MSProject.Application") 
    pjApp.Visible = True 
    pjApp.FileNew 
    pjApp.ActiveProject.Tasks.Add "Hang clocks" 
    pjApp.FileSaveAs "Clocks.mpp" 
    pjApp.FileClose 
    pjApp.Quit 
End Sub

Если для свойства Visible не задано значение True, приложение Project будет работать в фоновом режиме, не будучи видимым.

Использование проекта из другого приложения: ранняя привязка

Ранняя привязка имеет более высокую производительность, так как загружает библиотеку типов во время разработки. Чтобы использовать раннюю привязку, необходимо задать ссылку на приложение Project из приложения, с которым вы работаете. Например, в VBE для документа Word щелкните Ссылки в меню Сервис , прокрутите список Доступные ссылки и установите флажок Библиотека объектов Microsoft Project 15.0 .

В следующем примере проект открывается из другого приложения, например Excel, добавляется задача, а затем проект сохраняется и закрывается.

Sub ModifyProject_Early() 
    Dim pjApp As MSProject.Application 
    Set pjApp = New MSProject.Application 
    pjApp.Visible = True 
    pjApp.FileOpen "Clocks.mpp" 
    pjApp.ActiveProject.Tasks.Add "Wind clocks" 
    pjApp.FileSave 
    pjApp.FileClose 
    pjApp.Quit 
End Sub

Замечания

Важно!

Для событий уровня приложения регистрируйте обработчики событий после установки Application.Visible = True.

Если вы создадите экземпляр Project из другого приложения и зарегистрируете какое-либо событие уровня приложения до того как присвоите свойству Visible объекта Application значение True, свойства и методы дочерних объектов объекта Application не будут работать. Например, свойство Application.ActiveProject.Name будет недоступно.

Многие свойства и методы, возвращающие наиболее распространенные объекты пользовательского интерфейса, например активный проект, представленный свойством ActiveProject , можно использовать без квалификатора объекта Application . Например, вместо записи Application.ActiveProject.Visible = True можно писать ActiveProject.Visible = True

События

Методы

Имя

Свойства

Имя

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

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