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