Возвращают активный объект: рабочую книгу, лист, ячейку, диаграмму, диалоговое окно. Свойство ActiveCell содержится В ActiveSheet, а свойства ActiveSheet, ActiveChart И ActiveDialog в ActiveWorkbook.
Свойства
Выполняемые действия и допустимые значения
ActiveChart
В следующем примере в активной ячейке устанавливается по-
ActiveDialog
лужирный шрифт и в нее вводится строка текста Отчет за май: With ActiveCell .Font. Bold = True .Value = "Отчет за май" End With
ThisWorkbook
Возвращает рабочую книгу, содержащую выполняющийся в данный момент макрос. Это свойство может возвращать рабочую книгу, отличную от возвращаемой свойством Active-Workbook, т. к. выполняемый макрос может находиться в неактивной книге
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 — строка формул не будет выводиться в окне Excel
Свойства
Выполняемые действия и допустимые значения
DisplayStatusBar
Допустимые значения: True (строка состояния видна в окне Excel) и False (строка состояния не видна). Например:
Application. DisplayStatusBar = True — строка состояния не будет выводиться в окне Excel
EnableCancelKey
Определяет действие при нажатии комбинации клавиш <Ctrl>+<Break>, используемой для прерывания выполнения процедуры. Допустимые значения:
xlDisabled (прерывания программы запрещено) xllnterrupt (прерывание процедуры разрешено) XlErrorHandler (прерывание воспринимается как ошибка)
Height
Высота окна приложения в пунктах
Width
Ширина окна приложения в пунктах
Left
Расстояние в пунктах от левой границы окна приложения до левого края экрана
Right
Расстояние в пунктах от правой границы окна приложения до правого края экрана
Top
Расстояние в пунктах от верхней границы окна приложения до верхнего края экрана
ScreenUpdating
Допустимые значения: True (изображение обновляется во время выполнения программы) и False (изображение не обновляется). Задание False в качестве значения свойства ускоряет выполнение процедуры. В конце процедуры свойству
ScreenUpdating необходимо присвоить значение True
StatusBar
Выводит заданный текст в строке состояния. Выполнение приведенного ниже примера позволит вывести текст Ввод данных. . . в строке состояния:
Application. DisplayStatusBar = True Application. StatusBar = "Ввод данных..."
Version
Возвращает номер текущей версии Excel. Применяется для проверки того, что приложение используется в корректной версии. Например:
If Application. Version о "8.0" Then Exit Sub