Свойства-участники объекта Workbook

Объект Workbook и его свойства

Листинг 3. Использование методов коллекции Sheets

Public Sub ExampleSheets() Dim N As Long Workbooks("BookFive").Activate With ActiveWorkbook With.Sheets.Item(1).Name = "Two".Item(2).Name = "Four".Add Before:=.Item("Two").Add After:=.Item("Two"), Type:=xlChart.Item(1).Name = "One".Item(3).Name = "Three" N =. Count.Item("Four").Delete.Item("One"). Activate ‘Запуск макроса Fibonachi, заполняющего область листа А1:А20 ‘последовательностью чисел Фибоначчи Fibonachi ‘копирование 1 листа на 3 лист с именем One(2).Item("One").Copy After:=.Item("Two") ActiveSheet.Name = "Last".Item("Last").Move After:=.Item("Three") ‘Копирование области одного листа на последовательность листов ‘(включается и лист-источник) Х = Array("One", "Two", "Three") Sheets(X).FillAcrossSheets Range:=Worksheets("One").Range("А1:А20") For i = 1 То.Count Debug.Print.Item(i).Name,.Item(i).Type,.Item(i).Range("A20").Value Next i End With End With End Sub

Эта процедура хранится в модуле, связанном с книгой BookOne.

Объект Workbook представляет рабочую книгу Excel. Рабочая книга Excel устроена проще, чем документ Word. Как и положено книге, она состоит из страниц (листов). Это означает, что объект Workbook имеет свойство Sheets, возвращающее объект Sheets – коллекцию листов. Поскольку в коллекцию входят листы разного типа, то есть специальные свойства, позволяющие выделить коллекции:

· Worksheets – рабочих листов;

· Charts – диаграмм;

· Excel4MacroSheets – макросов Ехсеl4.

Каждая из этих коллекций является частью коллекции Sheets. Кроме того, есть четвертый тип листов – листы, содержащие модули. Однако отдельной коллекции ModulesSheets нет. Найти модули можно либо через Sheets, либо, что более естественно, через объект VBProject (см. конец предыдущего раздела). Проект является частью каждой рабочей книги.

Помимо вышеуказанного свойства Sheets, объект Workbook обладает другими свойствами-участниками. Перечислим некоторые из них.

DocumentProperties – коллекция свойств документов, которая распадается, также как и Sheets, на два объекта – BuiltinDocumentProperties и CustomDocumentProperties – встроенные и определенные пользователем свойства. Встроенные свойства определяют название и автора документа, аннотацию, различные статистические данные – количество страниц, символов, абзацев, дату последнего обновления и печати и другие характеристики. В коллекцию можно добавлять новые свойства, так или иначе характеризующие рабочую книгу. Для каждого добавляемого свойства можно указать имя, значение, тип и другие характеристики. Все добавляемые свойства являются пользовательскими и входят в коллекцию CustomDocumentProperties.

Styles – коллекция стилей, представляет стили форматирования, применяемые для объектов Range. Есть встроенные стили: Normal, Currency, Percent, но можно добавлять в коллекцию и собственные стили, задав в момент добавления соответствующие характеристики – шрифт, размер, рамки и т.д.

Коллекции CommandBars и Windows относятся к общим объектам.

ActiveSheet и ActiveChart – свойства, возвращающие активные рабочий лист или диаграмму.

RoutingSlip – объект, определяющий характеристики передачи рабочей книги по сети участникам ее разработки. Объект используется при работе в сети, когда несколько участников работают над одним документом. Предполагается также, что включено терминальное свойство HasRoutingSlip.

Дата добавления: 2014-01-05