Щёлкнуть правой кнопкой мыши на элементе ЭтаКнига.
В появившемся контекстном меню (рис.18) выбрать команду Insert Module.
Рис.18. Контекстное меню
В приложение будет добавлен модуль Module1 (рис. 19).
Рис. 19. Окно проектов
В верхней части окна кода модуля находится инструкция Option Explicit, которая требует явно описывать все переменные с помощью операторов Dim, Private, Public, ReDim и Static. Эта инструкция в новом модуле появляется только тогда, когда в диалоговом окне Options на вкладке Editor установлен флажок опции Require Variable Declaration (Рис. 20). Хороший стиль программирования рекомендует явно описывать все переменные. Диалоговое окно Options открывается командой Tools Options (рис.21).
Рис.20. Диалоговое окно Options Рис.21. Выбор команды
Tools Options
При попытке использовать переменную без её объявления при запуске процедуры на выполнение будет выдано сообщение об ошибке “Variable not defined” (“Переменная не определена”).
Выбрать в меню окна проектов команду Insert Procedure (рис.22).
Рис. 22. Выбор команды Insert Procedure
Откроется окно добавления процедуры в проект Add Procedure, в поле Name ввести имя процедуры, например, «Начало_VBA». (рис. 23).
Рис. 23. Окно добавления процедуры
В секции Туре установить переключатель Sub и щёлкнуть на кнопке ОК. Как показано на рис.8, в модуль будет добавлена пустая процедура «Начало_VBA». Эта процедура имеет по умолчанию статус Public, что делает её доступной из любой другой процедуры данной рабочей книги. В пустой строке находится текстовый курсор, предлагая начать ввод кода процедуры.
Рис. 24. Пустая процедура VBA
Ввести за строкой «Public Sub Начало_VBA» следующий текст:
MsgBox "Начинаем работать с VBA"
После нажатия клавиши пробела за словом MsgBox появится окно (рис.25) с информацией о данной инструкции:
MsgBox(Prompt, [Buttons As VbMsgBoxStyle = vbOKOnly]…)
Рис.25. Ввод инструкций процедуры Начало_VBA
Текст введённой процедуры показан на рис. 26.
Рис. 26. Процедура Начало_VBA
Имена VBA для подпрограмм и функций, как и всех других объектов VBA, образуются на основании следующих правил:
первый символ имени должен быть буквой (латинского или русского алфавита);
имя может содержать буквы, цифры и знаки подчеркивания;
имя не может содержать пробелы, точки, запятые, восклицательные знаки (!) и символы @, &, $, #; в качестве разделителей слов рекомендуется использовать знаки подчеркивания;
имя не должно иметь более 255 символов.
Выполнение процедуры
После создания процедуры её можно сразу выполнить. Это можно сделать одним из двух способов:
использовать команду Run Sub/UserForm из меню Run,
нажать клавишу <F5>.
Выполним процедуру Начало_VBA первым способом.
Выбрать пункт Run стандартной панели инструментов редактора Visual Basic (рис.271)
Рис.27. Окно Run стандартной панели инструментов
В раскрывшемся меню выбрать пункт Run Sub/UserForm.
Процедура выполнится и отобразит окно сообщения (рис. 28).
Рис. 28. Результат выполнения процедуры Начало_VBA
Щелкнуть кнопку ОК; произойдёт возврат в окно редактора Visual Basic.