В иерархии Excel объект worksheet идет сразу после объекта workbook и представляет рабочий
лист.
Приведем несколько наиболее часто используемых свойств и методов объекта Worksheet.
Методы |
Выполняемые
действия |
||
Name |
Возвращает имя
рабочего листа. В следующем примере первому листу активной рабочей книги
присваивается имя Итоги за декабрь : Worksheets (1) . Visible = "Итоги за декабрь" |
||
Add |
Создает новый рабочий лист. Синтаксис: Add (Before, After,
Count, Type)
xlExce14MacroSheet
и хlЕхсеl4 IntlMacroSheet. Например: ActiveWorkbook
. Worksheets . Add — вставляется
новый лист перед активным листом активной рабочей книги |
||
Delete |
Удаляет рабочий
лист. Например: Worksheets (1)
. Delete - удаляется первый рабочий лист из активной рабочей книги |
||
|
Защищает рабочий
лист от внесения в него изменений Синтаксис: Protect (Password,
DrawingObjects, Contents, Scenarios, User Inter faceOnly)
|
||
|
В следующем
примере установлена полная защита активного рабочего листа от любых
изменений со стороны пользователя: Active Sheet .Protect Password: =" Секрет" , DrawingObjects :=True, Contents :=True,
Scenarios : =True |
||
Unprotect |
Снятие защиты с рабочего листа. Синтаксис: Unprotect (Password)
В следующем
примере снимается защита с активного рабочего листа: ActiveSheet . Protect
Password: ="Секрет" |
||
Copy |
Копирование рабочего листа в другое место рабочей книги. Синтаксис: Copy (Before, .
After)
Одновременно
допустимо использование только одного из аргументов. В следующем
примере Лист1 активной рабочей книги копируется после ЛистЗ той же
рабочей книги: Worksheets ( "Лист1")
.Сору after :=Worksheets ("ЛистЗ"') |
||
Move |
Перемещение
рабочего листа в другое место рабочей книги. Синтаксис: Move (Before, After)
Одновременно допустимо использование только одного из аргументов. В примере Лист1
активной рабочей книги перемещается перед ЛистЗ той же рабочей книги: Worksheets ( "Лист1" ) .Move Before : =Worksheets ("Лист3") |
||
Evaluate |
Преобразует
выражение в объект или значение. Используется при вводе формул и ячеек
из диалоговых окон. В следующем
примере в поле ввода первого появившегося ) диалогового окна вводится
ссылка на ячейку, например A1, процедура считывает значение из этой
ячейки и отображает его в диалоговом окне. После этого в поле ввода
следующего диалогового окна надо ввести какое-нибудь арифметическое
выражение, например sin(l) ^2. Процедура вычислит значение этого выражения
и отобразит в диалоговом окне: Sub Два Примера
ДляEvaluate ( ) ' ' Ввод адреса ячейки
' Ячейка = InputBox
( "Введите имя ячейки") ' ' Считывание значения
из ячейки с указанным адресом ' Значение = Evaluate
(Ячейка) .Value ' ' Вывод считанного
значения в диалоговое окно ' MsgBox CStr (Значение)
' ' Ввод в диалоговое
окно формулы, например, sin(1)^2 ' Функция = InputBox
( "Введите функцию" ) ' ' Вычисление значения
по введенной формуле ' Значение = Evaluate
(Функция) ' Вывод найденного
значения в диалоговом окне ' MsgBox CStr (Значение)
End Sub |
Событие | Когда возникает событие |
BeforeClose | При закрытии рабочей книги |
BeforePrint | Перед печатью рабочей книги |
BeforeSave | Перед сохранением рабочей книги |
Deactivate | Когда рабочая книга теряет фокус |
NewSheet | При добавлении нового листа |
Open | При открытии рабочей книги |
SheetActivate | При активизации любого рабочего листа |
Sheet Deactivate | Когда рабочий лист теряет фокус |
Когда тот или иной физик использует понятие "физический вакуум", он либо не понимает абсурдности этого термина, либо лукавит, являясь скрытым или явным приверженцем релятивистской идеологии.
Понять абсурдность этого понятия легче всего обратившись к истокам его возникновения. Рождено оно было Полем Дираком в 1930-х, когда стало ясно, что отрицание эфира в чистом виде, как это делал великий математик, но посредственный физик Анри Пуанкаре, уже нельзя. Слишком много фактов противоречит этому.
Для защиты релятивизма Поль Дирак ввел афизическое и алогичное понятие отрицательной энергии, а затем и существование "моря" двух компенсирующих друг друга энергий в вакууме - положительной и отрицательной, а также "моря" компенсирующих друг друга частиц - виртуальных (то есть кажущихся) электронов и позитронов в вакууме.
Однако такая постановка является внутренне противоречивой (виртуальные частицы ненаблюдаемы и их по произволу можно считать в одном случае отсутствующими, а в другом - присутствующими) и противоречащей релятивизму (то есть отрицанию эфира, так как при наличии таких частиц в вакууме релятивизм уже просто невозможен). Подробнее читайте в FAQ по эфирной физике.