Userlnterf aceOnly - допустимі значення: True (аркуш захищений від змін з боку користувача, але не підпрограми VBA) і False (аркуш захищений від змін з боку як користувача, так і підпрограми VBA). За замовчуванням використовується значення False
У наступному прикладі встановлена повна захист активного робочого листа від будь-яких змін з боку користувача:
Active Sheet .Protect
Password: = "Секрет".
Contents: = True, Scenarios. = True
Зняття захисту з робочого аркуша.
Password - рядок, що використовується в якості пароля для захисту листа
У наступному прикладі знімається захист з активного робочого листа:
ActiveSheet. Protect Password: = "Секрет"
Before - робочий лист книги, перед яким вставляється даний
After - робочий лист, після якого вставляється даний
Одночасно допустимо використання тільки одного з аргументів.
У наступному прикладі Лист1 активної робочої книги копіюється після ЛістЗ тієї ж робочої книги:
Worksheets ( "Лист1") .Сору after: = Worksheets ( "ЛістЗ" ')
Переміщення робочого листа в інше місце робочої книги.
Move (Before, After)
Before - лист робочої книги, перед яким вставляється даний
After - лист, після якого вставляється даний
Одночасно допустимо використання тільки одного з аргументів.
У прикладі Лист1 активної робочої книги переміщається перед ЛістЗ тієї ж робочої книги:
Worksheets ( "Лист1") .Move Before. = Worksheets ( "Ліст3")
Перетворює вираз в об'єкт або значення. Використовується при введенні формул і осередків з діалогових вікон.
Sub Два Прімера ДляEvaluate () '
Осередок = InputBox ( "Введіть ім'я осередку") '
Значення = Evaluate (Осередок) .Value '
'Висновок зчитаного значення в діалогове вікно
MsgBox CStr (Значення) '
'Введення в діалогове вікно формули, наприклад, sin (1) ^ 2'
Функція = InputBox ( "Введіть функцію") '
'Обчислення значення по введеної формулою'
Значення = Evaluate (Функція)
'Висновок знайденого значення в діалоговому вікні'
MsgBox CStr (Значення) End Sub