Объект Application (приложение) является главным в иерархии объектов Excel и представляет само приложение Excel. Он имеет более 120 свойств и 40 методов. Эти свойства и методы предназначены для установки общих параметров приложения Excel. Кроме того, объект Application позволяет вызывать более 400 встроенных функций рабочего листа при помощи конструкции вида: Application.ФункцияРабочегоЛиста (Аргументы)
Например:
Application. Pi ()
Вычисление числа п
Application. Pmt (Аргументы)
Определение постоянных периодических платежей при постоянной процентной ставке с помощью функции ППЛАТ (РМТ)
Application. Sum (Аргументы)
Нахождение суммы значений из ячеек диапазона
Свойства объекта Application
Свойства
Выполняемые действия и допустимые значения
ActiveWorkbook,
ActiveSheet,
ActiveCell,
ActiveChart,
ActiveDialog,
Возвращают активный объект: рабочую книгу, лист, ячейку, диаграмму, диалоговое окно. Свойство ActiveCell содержится в ActiveSheet, а свойства ActiveSheet, ActiveChart и ActiveDialog в ActiveWorkbook.
В следующем примере в активной ячейке устанавливается полужирный шрифт и в нее вводится строка текста Отчет за май:
With ActiveCell
.Font. Bold = True
.Value = «Отчет за май»
End With
ThisWorkbook
Возвращает рабочую книгу, содержащую выполняющийся в данный момент макрос. Это свойство может возвращать рабочую книгу, отличную от возвращаемой свойством ActiveWorkbook, т. к. выполняемый макрос может находиться в неактивной книге
Calculation
Устанавливает режим вычислений.
Допустимые значения:
XlCalculationAutomatic (автоматический режим)
XlCalculationManual (вычисления выполняются вручную)
XlCalculationSemiAutomatic (автоматический режим, не распространяется на таблицы)
Caption
Возвращает текст в строке имени главного окна Excel. Установка свойства равным Empty возвращает заголовок, используемый по умолчанию.
В следующем примере первая инструкция устанавливает в качестве заголовка окна приложения текст Отчет за 1999 год, а вторая возвращает имя окна, используемое по умолчанию, т. е. Microsoft Excel:
Application. Caption = «Отчет за 1999 год»
Application. Caption = Empty
DisplayAlerts
Устанавливает возможность вывода и отключения стандартных предупреждений.
Допустимые значения:
True (отображаются встроенные предупреждения о работе программы)
False (предупреждения не отображаются)
DisplayFormulaBar
Устанавливает вывод строки формул.
Допустимые значения:
True (строка формул выводится в окне Excel)
False (строка формул не выводится).
В данном ниже примере установлен режим, при котором строка формул не будет выводиться в окне Excel:
Application. DisplayFormulaBar = False
DisplayScrollBars
Установка показа полосы прокрутки
Допустимые значения:
True (полосы прокрутки видны в окне Excel)
False (полосы прокрутки не отображаются).
Например отключаем полосу прокрутки
Application. DisplayScrollBars = False
DisplayStatusBar
Установка показ строки состояния
Допустимые значения:
True (строка состояния видна в окне Excel)
False (строка состояния не видна).
Например строка состояния не будет выводиться в окне Excel
Application. DisplayStatusBar = True
EnableCancelKey
Определяет действие при нажатии комбинации клавиш <Ctrl>+<Break>, используемой для прерывания выполнения процедуры.
Допустимые значения:
XlDisabled (прерывания программы запрещено)
Xllnterrupt (прерывание процедуры разрешено)
LErrorHandler (прерывание воспринимается как ошибка)
Height
Высота окна приложения в пунктах
Width
Ширина окна приложения в пунктах
Left
Расстояние в пунктах от левой границы окна приложения до левого края экрана
Right
Расстояние в пунктах от правой границы окна приложения до правого края экрана
Top
Расстояние в пунктах от верхней границы окна приложения до верхнего края экрана
ScreenUpdating
Устанавливает обновление изображений
Допустимые значения:
True (изображение обновляется во время выполнения программы)
False (изображение не обновляется).
Задание False в качестве значения свойства ускоряет выполнение процедуры. В конце процедуры свойству ScreenUpdating необходимо присвоить значение True
StatusBar
Выводит заданный текст в строке состояния.
Выполнение приведенного ниже примера позволит вывести текст Ввод данных… в строке состояния:
Application. DisplayStatusBar = True
Application. StatusBar = «Ввод данных…“
Version
Возвращает номер текущей версии Excel.
Применяется для проверки того, что приложение используется в корректной версии.
Например: