В иерархии Excel объект workbook (рабочая книга) идет сразу после объекта Application и представляет файл рабочей книги. Рабочая книга хранится либо в файлах формата XLS (стандартная рабочая книга) или XLA (полностью откомпилированное приложение). Свойства и методы рабочей книги позволяют работать с файлами.
Свойства |
Выполняемые
действия и допустимые значения |
||
ActiveSheet |
Возвращает активный
лист книги. Например: MsgBox "Имя
активного листа " & ActiveSheet . Name — выводит в диалоговом
окне имя активного рабочего листа |
||
ActiveDialog |
Возвращает активное
диалоговое окно |
||
ActiveChart |
Возвращает активную диаграмму |
||
Sheets |
Возвращает семейство
всех листов книги |
||
Worksheets |
Возвращает семейство
всех рабочих листов книги |
||
Charts |
Возвращает семейство
всех диаграмм книги (которые не внедрены в рабочие листы) |
||
Count |
Возвращает число
объектов семейства workbooks |
||
HasPassword |
Допустимые значения:
True (если у документа имеется пароль защиты), False (в противном
случае) |
||
WriteRe served | Допустимые значения: True (если документ закрыт для записи), False (в противном случае) | ||
Saved |
Допустимые значения:
True (если не производились изменения в документе со времени его последнего
сохранения), False (в противном случае) |
||
MailSystem |
Возвращает имя
инсталлированных на компьютере средств работы с электронной почтой.
Допустимые значения:
В следующем примере
проверяется, инсталлирована ли электронная почта. Если электронная почта
не установлена, то отображается соответствующее сообщение: If Application. MailSystem <> xlMAPI Then MsgBox "Microsoft Mail неинсталлирован" End If |
||
Методы |
Выполняемые
действия |
||
Activate |
Активизирует рабочую
книгу так, что ее первый рабочий лист становится активным. Например: Workbook. Activate
|
||
Add | Создает
новый объект для семейства Workbooks.
Синтаксис: Add (Template)
Если аргумент
Template опущен, то создается новая рабочая книга с количеством листов,
заданных свойством SheetsInNewWorkbook |
||
Protect |
Защищает рабочую
книгу от внесения в нее изменений. Синтаксис: Protect (Password,
Structure, Windows)
В следующем примере
устанавливается защита для активной рабочей книги: ActiveWorkbook. Protect
Password:= "ВинниПух" |
||
Unprotect |
Снятие защиты с рабочей книги. Синтаксис: Unprotect (Password)
В следующем
примере снимается защита с активной рабочей книги: ActiveWorkbook.
Unprotect Password := "ВинниПух " |
||
Close |
Закрытие рабочей
книги |
||
Open |
Открытие существующей
рабочей книги |
||
OpenText |
Открытие текстового
файла, содержащего таблицу данных |
||
Save |
Сохранение рабочей
книги |
||
SaveAs |
Сохранение рабочей книги в другом файле. Синтаксис: SaveAs (Filename)
В следующем
примере активная рабочая книга сохраняется в файле с именем НоваяВерсия: ActiveBook. SaveAs
Filename := "НоваяВерсия" |
||
SaveAsCopy |
Сохранить рабочую
книгу в другом файле, оставляя рабочую книгу в памяти с прежним именем. Синтаксис: SaveAs (Filename,
FileFormat)
В следующем
примере активная рабочая книга сохраняется в файле с именем ЗапаснаяВерсия: ActiveBook. SaveAsCopy
Filename := "ЗапаснаяВерсия" |
||
PrintPreview |
Предварительный
просмотр |
||
Printout |
Печать содержимого
рабочей книги |
||
SendMail |
Отсылка почты
используя встроенные средства Microsoft Mail (MAPI). Синтаксис: SendMail (Recipients,
Subject, ReturnReceipt )
В следующем примере
рабочая книга отсылается по электронной почте получателю Порфирию Заковыркину: ThisWorkbook . SendMail recipients : = " Порфирий Заковыркин" |
||
Событие | Когда возникает событие |
BeforeClose | При закрытии рабочей книги |
BeforePrint | Перед печатью рабочей книги |
BeforeSave | Перед сохранением рабочей книги |
Deactivate | Когда рабочая книга теряет фокус |
NewSheet | При добавлении нового листа |
Open | При открытии рабочей книги |
SheetActivate | При активизации любого рабочего листа |
Sheet Deactivate | Когда рабочий лист теряет фокус |