🗊Презентация Объект Application

РХТУ им. Д.И. Менделеева Каф. ИКТ Курс создал: ст. преп. A.М. Васецкий

Объект Application Объект Application (приложение) является главным в иерархии объектов Excel и представляет само приложение Excel. Он имеет более 120 свойств и 40 методов. Эти свойства и методы предназначены для установки общих параметров приложения Excel. Application находится на вершине объектной модели Excel и содержит все остальные объекты. Кроме этого, объект Application выступает хранилищем для свойств и методов, которые не подходят для включения в любой другой объект, но необходимы для программного управления Excel. Например, существуют свойства объекта Application, предназначенные для управления обновлением экрана и включения предупреждений.

Свойства объекта Application Глобальные члены Многие методы и свойства объекта Application являются членами группы <globals>, доступной в самом начале списка классов в окне Object Browser Если свойство или метод входит в группу <globals>, на него можно ссылаться, не указывая ссылку на объект. Cсылки эквивалентны: Application.ActiveCell ActiveCell Однако, не все свойства объекта Applications глобальны Например ScreenUpdating, не являются глобальными. Корректно: Application.ScreenUpdating = False А применение ScreenUpdating = False приводит к созданию новой переменной ScreenUpdating

Свойства объекта Application типа Active Объект Application предоставляет множество ссылок, которые можно применять для обращения к активным объектам без указания явного имени. Это даёт возможность создавать универсальный код, который работает с объектами одного и того же типа, но имеющими разные имена.

Свойства объекта Application

Свойства объекта Application Свойство Selection не будет возвращать ссылку на объект Range, если выделен объект другого типа, например Shape, или активный лист не является листом электронной таблицы. Возможно, в макрос потребуется добавить условие, которое будет проверять, выделен ли лист электронной таблицы, перед тем как вставлять данные. If TypeName(ActiveSheet) <> "Worksheet" Or _ TypeName(Selection) <> "Range" Then _ MsgBox "Этот макрос может использоваться" _ & "только вместе с диапазоном", vbCritical Exit Sub End If

Пример Application позволяет вызывать более 400 встроенных функций рабочего листа при помощи конструкции вида: Application.ФункцияРабочегоЛиста(Аргументы) Следует обратить внимание, что формат использования матричных функций несколько отличается от формата обычных. (см. пример). Функции листа в VBА задаются только в английском варианте. Таблица соответствия русских и английских функций см. в файле funcs.xls в папке Microsoft office\...

Примеры использования функций рабочего листа

Свойства объекта Application

Свойства объекта Application

Примеры Подавление предупреждений при удалении рабочего листа: Application.DisplayAlerts = False ActiveSheet.Delete Application.DisplayAlerts = True Стоит избегать выделения объектов средствами кода VBA. Это редко когда требуется, и при отказе от выделения или активизации объектов код будет работать быстрее. Если экран необходимо зафиксировать на время работы макроса то: Application.ScreenUpdating = False

Свойства объекта Application (продолжение)

Свойства объекта Application

Методы объекта Application

Методы объекта Application (продолжение)

Run (пример)

Коды клавиш для OnKey

Коды клавиш для OnKey Допустимо использование сочетания одновременно нажатых клавиш. С этой целью для перечисленных трех клавиш установлены следующие коды: <Shift> - + <Ctrl> - ^ <Alt> - % В примере процедуре Амортизация назначена комбинация клавиш <Ctrl>+<+>, а процедуре ПроцентнаяСтавка – <Shift>+<Ctrl>+<->.>: Application.OnKey "^{+}", "Амортизация" Application.ОnКеу "+^ {RIGHT}", _"ПроцентнаяСтавка"

Пример Private Sub Workbook_Open() ‘располагается в коде листа ‘Отслеживаем нажатие клавиши Application.OnKey "{DEL}", "MyDel" End Sub Private Sub Workbook_BeforeClose(Cancel As Boolean) ‘располагается в коде листа ‘Восстанавливаем стандартную реакцию на клавишу Application.OnKey "{DEL}" End Sub Sub MyDel() ‘располагается в основном модуле ‘Описание действий при нажатии на клавишу Msgbox "Нажата клавиша DEL" End Sub

Методы объекта Application (продолжение)

Метод Evaluate Может использоваться для расчета значения формул листов Excel и генерации ссылок на объекты Range. Стандартный синтаксис вызова метода Evaluate выглядит следующим образом: Evaluate("Выражение") Кроме этого, существует сокращенная форма вызова, в которой отсутствуют двойные кавычки, а выражение заключается в квадратные скобки, например: [Выражение] На месте Выражения может находиться любое действительное выражение на листе с или без знака равенства слева. Также это может быть ссылка на диапазон ячеек. Расчеты на листе могут включать в себя функции, недоступные в VBA через объект WorksheetFunction. Также это могут быть формулы массивов на листе Следующие два примера являются эквивалентными и возвращают значение True, если ячейка A1 пустая, и False в противном случае: MsgBox Evaluate("=ISBLANK(A1)") MsgBox [ISBLANK(A1)]

Evaluate (продолжение) Два способа использования метода Evaluate для генерации ссылки на объект Range с присвоением значения этому объекту: Evaluate("A1").Value = 10 [A1].Value = 10 Эти выражения эквивалентны. Выражение можно сократить еще больше, опустив свойство Value, так как это принятое по умолчанию свойство объекта Range: [A1] = 10

Метод Inputbox Answer = Application.InputBox(prompt:="Введите диапазон", Type:=8) Параметр Type может принимать следующие значения (или сумму этих значений):

Пример. Ввод диапазона Public Sub SelectRange() Dim aRange As Range On Error Resume Next Set aRange = Application.InputBox(prompt:="Введите диапазон", Type:=8) If aRange Is Nothing Then MsgBox "Операция отменена" Else aRange.Select End If End Sub

События объекта Application

Объект Workbook и семейство Workbooks В иерархии Excel объект workbook (рабочая книга) идет сразу после объекта Application и представляет файл рабочей книги. Рабочая книга хранится либо в файлах формата XLS (стандартная рабочая книга) или XLA (полностью откомпилированное приложение). Свойства и методы рабочей книги позволяют работать с файлами.

Свойства объектов Workbook и семейства Workbooks

Свойства объекта Workbook и семейства Workbooks

Методы объекта Workbook и семейства Workbooks

Методы объекта Workbook и семейства Workbooks

Методы объекта Workbook и семейства Workbooks

События объекта Workbook и семейства Workbooks

Свойства объекта Worksheet и семейство Worksheets

Методы объекта Worksheet и семейство Worksheets

Методы объекта Worksheet и семейство Worksheets

Методы объекта Worksheet и семейство Worksheets

Методы объекта Worksheet и семейства Worksheets

События объекта Worksheet и семейства Worksheets