Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Создание пользовательских п ÒÉÌÏÖÅÎÉÊ ÓÒÅÄÓÔÁÍ...doc
Скачиваний:
6
Добавлен:
18.11.2019
Размер:
2.02 Mб
Скачать

Объект Application

При открытии MS Excel автоматически становится доступным объект Application с его свойствами и методами. Объект Application – корневой объект приложения. В него вложены остальные объекты приложения. Доступ к ним осуществляется посредством свойств-участников объекта Application.

Для создания ссылки на объект Application используется свойство Application.

Примеры операторов

Application.Windows("AIR.XLS ").Activate

Оператор активизирует рабочую книгу

Application.Goto Range("B3:C5")

Оператор выделяет интервал ячеек на активном рабочем листе.

Многие свойства объекта Application используются без ссылки на объект Application, так как они возвращают объекты, относящиеся к классу globals.

Активные объекты

Свойства, название которых начинается со слова Active, возвращают активный объект соответствующего типа. Для этих свойств необязательно указывать ссылку на объект Application, так как они входят в класс globals. Некоторые из этих свойств являются одновременно свойствами нескольких объектов, не только объекта Application.

Свойства, возвращающие активный или выделенный объект

Свойство

Объект

Действие

Возвращаемый объект

ActiveCell

Application, Window

Возвращает активную ячейку

Range

ActiveSheet

Application, Window, Workbook

Возвращает активный лист. Это может быть рабочий лист, лист диаграмм

Sheet

ActiveWorkbook

Application

Возвращает активную рабочую книгу

Workbook

ActiveWindow

Application

Возвращает активное окно

Window

Selection

Application, Window

Возвращает выделенный объект

различные типы объектов

Так как перечисленные в таблице свойства возвращают объекты, при записи операторов для активных объектов используются методы или свойства объектов соответствующих типов.

Примеры

Оператор

Комментарий

ActiveCell.Font.Bold=True

Устанавливает полужирный шрифт текста активной ячейки

ActiveSheet.Name="Проба"

Изменяет название активного листа рабочей книги

MsgBox ActiveWorkbook.Fullname

Высвечивает полное имя рабочей книги, включая путь и имя файла

Selection.NumberFormat="0.00"

Устанавливает числовой формат с двумя знаками после запятой для ячеек выделенного интервала

ActiveCell.Value=10

Application.ActiveCell.Value=10

ActiveWindow.ActiveCell.Value=10

Application.ActiveWindow.ActiveCell.Value=10

Присваивают активной ячейке значение 10. Приведенные примеры доступа к активной ячейке равносильны

Worksheets("Sheet1").Activate

Selection.Clear

Очищает предварительно выделенный на листе Sheet1 объект, например, интервал ячеек

Если никакой объект не выделен, то свойство Selection возвращает значение Nothing и очистка не выполняется

Worksheets("Sheet1").Activate

MsgBox "Тип объекта " & TypeName(Selection)

Высвечивает тип предварительно выделенного на листе Sheet1 объекта