В иерархии 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 | Когда рабочий лист теряет фокус |
Релятивисты и позитивисты утверждают, что "мысленный эксперимент" весьма полезный интрумент для проверки теорий (также возникающих в нашем уме) на непротиворечивость. В этом они обманывают людей, так как любая проверка может осуществляться только независимым от объекта проверки источником. Сам заявитель гипотезы не может быть проверкой своего же заявления, так как причина самого этого заявления есть отсутствие видимых для заявителя противоречий в заявлении.
Это мы видим на примере СТО и ОТО, превратившихся в своеобразный вид религии, управляющей наукой и общественным мнением. Никакое количество фактов, противоречащих им, не может преодолеть формулу Эйнштейна: "Если факт не соответствует теории - измените факт" (В другом варианте " - Факт не соответствует теории? - Тем хуже для факта").
Максимально, на что может претендовать "мысленный эксперимент" - это только на внутреннюю непротиворечивость гипотезы в рамках собственной, часто отнюдь не истинной логики заявителя. Соответсвие практике это не проверяет. Настоящая проверка может состояться только в действительном физическом эксперименте.
Эксперимент на то и эксперимент, что он есть не изощрение мысли, а проверка мысли. Непротиворечивая внутри себя мысль не может сама себя проверить. Это доказано Куртом Гёделем.
Понятие "мысленный эксперимент" придумано специально спекулянтами - релятивистами для шулерской подмены реальной проверки мысли на практике (эксперимента) своим "честным словом". Подробнее читайте в FAQ по эфирной физике.
|
![]() |