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

24.1. Основы работы с Project Professional. Объект Application

VBA в Project Professional 2003, объект Project.Application, централизованное хранение кода VBA

Первый объект в Project Professional 2003, как и во всех других приложениях Office - это объект Application со стандартным набором свойств и методов. Создать объект Application - значит запустить Project Professional:

Dim pj As New MSProject.Application

pj.Visible = True

MsgBox pj.Name & " " & pj.Version

Если запуск производится из нормального Visual Basic, или другого приложения VBA, то нам потребуется добавить в проект ссылку на библиотеку Microsoft Project 11.0 Object Library (по умолчанию C:\Program Files\Microsoft Office\Office11\MSPRJ.OLB).

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

Application.ActiveProject.Visible = True

и

ActiveProject.Visible = True

В Project Professional есть замечательное средство, которого очень не хватает в Word, Excel, PowerPoint и других приложениях VBA. Это средство - глобальный корпоративный шаблон. Он един для всего сервера Project Server, автоматически загружается при подключении пользователя к Project Server и модули из него доступны всем пользователям Project Server. Фактически это - корпоративное хранилище кода VBA. Конечно, его можно использовать не только для вещей, непосредственно связанных с Project, но и для других целей, например, для создания документов Word по единой форме. Еще немного развив эту тему, можно прийти к системе копоративного репортинга с централизованным хранилищем определений отчетов.

Однако при этом нужно быть очень внимательным: если у вас есть модуль Module1 в глобальном корпоративном шаблоне и модуль с таким же именем в проекте, модуль проекта со всем кодом будет заменен модулем из шаблона.

Получить учебные материалы по этому курсу