2015-10-22
249
Использование элементов ActiveX на базе модели COM - компонентная модель объектов, позволяет создавать сложные составные документы, то есть там могут находиться материалы из разных программ - Excel, Access, PowerPoint и так далее. Кроме этого есть возможность пользоваться другим приложением для решения задач. Например Excel может использовать Access для хранения данных или наоборот Access может использовать Excel для расчетов. В общем это можно назвать построением пользовательских приложений на базе готовых программ.
Понятие, которое используется в основе всех интегрированных систем является служба. MS OFFICE обеспечивает все необходимые службы для создания офисных приложений:
ACCESS - База данных
EXCEL - Расчеты
WORD - Текстовый редактор
PowerPoint - Презентационная графика
Office Binder - Интеграция документов
Outlook - Служба управления документами
Internet Exploler - Работа с интернет
Объект с вашим приложением можно связать используя позднее и ранее связывание. Позднее связывание происходит на этапе выполнения кода и для него используется понятие Object. Ниже будет приведен код для программы Corel Draw и использование её в качестве объекта для Automation.
|
|
|
Sub Test()
Dim objCorel As Object
Set objCorel = CreateObject("CorelDraw.Graphic.8")
MsgBox ("press")
End Sub
В момент когда на экране появится сообщение PRESS нажмите Ctrl-Alt-Delete для просмотра активных объектов. Вот смотрите ниже.
Для позднего связывания используется меню Сервис - Ccылки, в предыдущих шагах мы об этом пункте меню упоминали. Вот пример для Excel.
Sub Test()
Dim objExcel As Excel.Application
Set objExcel = CreateObject("Excel.Application")
End Sub
Ну и напоследок как можно использовать объект Word из Excel:
Sub Test()
Dim objWord As Word.Application
Set objWord = CreateObject("Word.Application")
MsgBox (objWord.Caption)
MsgBox (objWord.UserName)
End Sub
