Объект Application
Доступ к объектам через свойства и методы
Вернемся к инструкции
Application.Workbooks(l).Worksheets(l).Range("A1").Value = 1
При написании её мы руководствовались иерархией объектов Excel. Однако, на самом деле Range – это свойство объекта Worksheets, Worksheets – это свойство объекта Workbooks, который, в свою очередь, является свойством объекта Application. Обращаясь к свойству семейства (Workbooks или Worksheets), мы передаем в него аргумент – порядковый номер нужного нам объекта (1), а обращаясь к свойству Range – его имя (A1).
Таким образом, наряду со свойствами, представляющими собой атрибуты объекта, имеется большой класс свойств[9], возвращающих объект. По субъективному мнению автора, свойства, возвращающие объект, гораздо легче воспринимать как объекты, находящиеся на соответствующих уровнях иерархии, как это было сделано в предыдущем параграфе. Однако в окне Просмотр объектов и в справочной системе они отнесены именно к свойствам.
Обратите внимание: у разных объектов бывает одно и то же свойство. Так, свойство Worksheets имеется у объектов Application и Workbooks. В первом случае это свойство возвращает семейство рабочих листов в активной рабочей книге (например, Worksheets(1).Range("A1).Value = 1),
а во втором – семейство рабочих листов в определенной рабочей книге
(Workbooks(1).Worksheets(1).Range("A1).Value = 1).
|
|
Объект Application располагается на самой верхней ступени иерархии и представляет само приложение Excel. Любое обращение к методу или свойству объекта Application влияет на все приложение Excel. Рассмотрим его основные свойства и методы.
ActiveWorkbook, ActiveSheet, ActiveCell, ActiveChart | Возвращают активную рабочую книгу, лист, ячейку, диаграмму. Доступно для чтения. В следующем примере в активной ячейке устанавливается полужирный шрифт размером 14 пунктов: With ActiveCell.Font .Size = 14 .Bold = True End With |
ThisWorkbook | Возвращает рабочую книгу, содержащую выполняющийся в данный момент макрос. Доступно для чтения. |
Caption | Заголовок окна Excel. String; доступно для чтения/записи. Application.Caption = "Мое приложение" Команда: Application.Caption = Empty возвращает заголовок, используемый по умолчанию |
DisplayAlerts | Управляет выводом на экран встроенных предупреждений Excel во время выполнения программы. True или False; доступно для чтения/записи. Application.DispIayAlerts = False |
SheetsInNewWorkbook | Количество листов в новой рабочей книге. Long, доступно для чтения/записи. Application.SheetsInNewWorkbook = 1 |
ScreenUpdating | Управляет обновлением экрана при выполнении программы. По умолчанию имеет значение True (экран обновляется). Действует только во время выполнения программы, в которой это свойство было изменено. True или False; доступно для чтения/записи. Application.ScreenUpdating = False |
WindowState | Устанавливает размер окна приложения. Доступно для чтения/записи. Может принимать одно из значений: q xlNormal Окно обычного размера q xlMaximized Окно развернуто q xlMinimized Окно свернуто Application.WindowState = xlNormal |
DisplaystatusBar | Управляет отображением и сокрытием строки состояния. True или False; доступно для чтения/записи. Application.DisplayStatusBar = False |
DisplayFormulaBar | Управляет отображением и сокрытием строки формул. True или False; доступно для чтения/записи. Application.DisplayFormulaBar = False |
|
|