Объект Workbook и семейство Workbooks. Основные объекты VBA. Язык визуального программирования приложений Visual Basic for Applications

В иерархии Excel объект workbook (рабочая книга) идет сразу после объекта Application и представляет файл рабочей книги. Рабочая книга хранится либо в файлах формата XLS (стандартная рабочая книга) или XLA (полностью откомпилированное приложение). Свойства и методы рабочей книги позволяют работать с файлами.

Свойства объекта Workbook и семейства Workbooks


	Свойства	Выполняемые действия и допустимые значения
	ActiveSheet	Возвращает активный лист книги. Например: MsgBox "Имя активного листа " & ActiveSheet . Name — выводит в диалоговом окне имя активного рабочего листа
	ActiveDialog	Возвращает активное диалоговое окно
	ActiveChart	Возвращает активную диаграмму
	Sheets	Возвращает семейство всех листов книги
	Worksheets	Возвращает семейство всех рабочих листов книги
	Charts	Возвращает семейство всех диаграмм книги (которые не внедрены в рабочие листы)
	Count	Возвращает число объектов семейства workbooks
	HasPassword	Допустимые значения: True (если у документа имеется пароль защиты), False (в противном случае)
	WriteRe served	Допустимые значения: 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 опущен, то создается новая рабочая книга с количеством листов, заданных свойством SheetsInNewWorkbook
	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	При активизации любого рабочего листа
Sheet Deactivate	Когда рабочий лист теряет фокус

Знаете ли Вы, что такое мысленный эксперимент, gedanken experiment?
Это несуществующая практика, потусторонний опыт, воображение того, чего нет на самом деле. Мысленные эксперименты подобны снам наяву. Они рождают чудовищ. В отличие от физического эксперимента, который является опытной проверкой гипотез, "мысленный эксперимент" фокуснически подменяет экспериментальную проверку желаемыми, не проверенными на практике выводами, манипулируя логикообразными построениями, реально нарушающими саму логику путем использования недоказанных посылок в качестве доказанных, то есть путем подмены. Таким образом, основной задачей заявителей "мысленных экспериментов" является обман слушателя или читателя путем замены настоящего физического эксперимента его "куклой" - фиктивными рассуждениями под честное слово без самой физической проверки.
Заполнение физики воображаемыми, "мысленными экспериментами" привело к возникновению абсурдной сюрреалистической, спутанно-запутанной картины мира. Настоящий исследователь должен отличать такие "фантики" от настоящих ценностей.

Релятивисты и позитивисты утверждают, что "мысленный эксперимент" весьма полезный интрумент для проверки теорий (также возникающих в нашем уме) на непротиворечивость. В этом они обманывают людей, так как любая проверка может осуществляться только независимым от объекта проверки источником. Сам заявитель гипотезы не может быть проверкой своего же заявления, так как причина самого этого заявления есть отсутствие видимых для заявителя противоречий в заявлении.

Это мы видим на примере СТО и ОТО, превратившихся в своеобразный вид религии, управляющей наукой и общественным мнением. Никакое количество фактов, противоречащих им, не может преодолеть формулу Эйнштейна: "Если факт не соответствует теории - измените факт" (В другом варианте " - Факт не соответствует теории? - Тем хуже для факта").

Максимально, на что может претендовать "мысленный эксперимент" - это только на внутреннюю непротиворечивость гипотезы в рамках собственной, часто отнюдь не истинной логики заявителя. Соответсвие практике это не проверяет. Настоящая проверка может состояться только в действительном физическом эксперименте.

Эксперимент на то и эксперимент, что он есть не изощрение мысли, а проверка мысли. Непротиворечивая внутри себя мысль не может сама себя проверить. Это доказано Куртом Гёделем.

Понятие "мысленный эксперимент" придумано специально спекулянтами - релятивистами для шулерской подмены реальной проверки мысли на практике (эксперимента) своим "честным словом". Подробнее читайте в FAQ по эфирной физике.