|
Средства быстрой разработки прикладных программФункция GetObject имеет два параметра. Первый - это полный путь и имя файла, содержащего объект. Второй - строка, определяющая тип создаваемого объекта. Если первый параметр опущен, то присутствие второго - обязательна. В этом случае функция GetObject пытается связаться с соответствующим экземпляром объекта выполняется. Если нет активного объекта указанного типа, то возникает ошибка. Когда в программе нужно создать только один экземпляр объекта-приложения, то, как правило, сначала вызывается функция GetObject и только если ее выполнение завершается неудачно, вызывается функция CreateObject. Это можно реализовать следующим образом: Public opExcel As Excel.Application 'объявление переменной, которая доступна' во всех модулях Public Function ДоступДоExcel () As Boolean ДоступДоExcel = True On Error Resume Next Set opExcel = GetObject (, "Excel.Application ") If opExcel Is Nothing Then Set opExcel = CreateObject ("Excel.Application ") End If If opExcel Is Nothing Then ДоступДоExcel = False End Function После того как корневой объект (в приведенном выше примере это Excel.Application) создан, есть реальная возможность обращаться к методам и свойствам объектов, встроенные (вложенные) у него и которые он экспортирует. Так, для создания новых рабочих книг, открытие существующих и закрытие их, используется объект-коллекция Workbooks. Например, команда opExce.Workbooks.Add добавит новую книгу в коллекцию Workbooks. Команда opExce.Workbooks.Open "D: \ Галузинський \ Завдання1.xls" откроет конкретную книгу, а команда opExce.Workbooks ("Завдання1.xls").Close SaveChange: = False закроет ее без сохранения внесенных изменений. Следующая команда закрывает активную рабочую книгу с сохранением внесенных изменений: opExce.ActiveWorkbook.Close SaveChange: = True Для ввода значений в клетки рабочего листа используется метод Range объекта Worksheet. Для определения диапазона клеток в рабочем листе можно указывать его адрес или имя (если оно было ему присвоено). В следующем примере в коллекцию Workbooks добавляется новая рабочая книга, ее первом рабочем листа предоставляется имя Примеры, во все клетки диапазона А1: С2 записывается числовое значение 5, диапазона клеток В6: D12 предоставляется имя Количество, которое затем используется для занесения в каждую клетку этого диапазона числового значения 47. Все эти действия на экране не отображаются, поскольку только после присвоения свойству Visible значения True объект opExcel становится видимым. Продолжение статьи: ч.1 Продолжение статьи: ч.2 Продолжение статьи: ч.3 Продолжение статьи: ч.4 Продолжение статьи: ч.5 Продолжение статьи: ч.6 Продолжение статьи: ч.7 Продолжение статьи: ч.8 Продолжение статьи: ч.9 Продолжение статьи: ч.10 Продолжение статьи: ч.11 Продолжение статьи: ч.12 Продолжение статьи: ч.13 Другие статьи по теме: - Технологии Internet- Использование языков и сред программирования как средств обучения - Введение в программирование с помощью api - Понятие алгоритма - Объектно-ориентированный подход к созданию программных средств |
|
2006-2024 © SMTI.RU Главная страница | Связаться с нами |