5.2.2. Структуризация программ vba и правила записи кода процедур

Основной структурной единицей при написании программ на VBA является процедура.

Процедура представляет собой описание последовательности инструкций (команд, или операторов), задающих алгоритм решения задачи. Эта последовательность команд записывается всего один раз, но может выполняться там, где это необходимо. Описанные в процедуре операторы образуют код процедуры.

Любая инструкция VBA помещается в отдельной строке кода. Если запись команды оказывается слишком «длинной» и «не вписывается» в одну строку в окне программы, что затрудняет просмотр кода, ее можно разбить на несколько строк с помощью символов продолжения строки кода ‘   _’ (в конце строки, которая должна быть продолжена, ставятся пробел и символ подчеркивания). Если строка заканчивается на эти символы, следующая строка рассматривается как ее продолжение.

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

Инструкции и описания в процедурах сопровождаются комментариями. Комментарием считается текст, следующий за одиночным апострофом (символ ') до конца строки. Даже при записи макроса автоматически генерируется комментарий по информации, введенной в диалоговом окне «Запись макроса».

Самой «простой» инструкцией VBA является команда, имеющая вид:

ИмяПеременной = Выражение

или

Let ИмяПеременной = Выражение

Она осуществляет пересылку значения выражения, записанного в правой его части (после знака ‘=’), в переменную, имя которой указано в левой части оператора (перед знаком ‘=’). Тип значения выражения должен соответствовать типу переменной (если он задан явным описанием). В некоторых случаях автоматически выполняется преобразование типа. Полный синтаксис оператора предусматривает использование инструкции Let. Но инструкция Let необязательна и чаще всего опускается.

Для присвоения объекта переменной, описанной как объект, применяется инструкция Set. Ключевое слово Set обязательно. Инструкции, задающие значение свойства объекта, также являются инструкциями присвоения. Более детально объекты и их свойства рассматриваются ниже, так как набор объектов является специфичным для каждого приложения.

Более подробную информацию можно получить в справочной системе VBA (раздел «Инструкции присвоения»).

Другие инструкции, стандартные структуры управления (ветвления, циклы) описаны ниже.

Команды, включенные в процедуру, выполняются, когда к ней происходит обращение (вызов процедуры). Для идентификации процедуры при ее вызове ей присваивается имя, которое указывается в заголовке процедуры. Все имена в VBA состоят из одного слова – идентификатора, представляют собой последовательность букв и цифр, в имени не должно быть разделителей.

Процедура может вызываться в качестве макроса или функции из приложения Office.

5.2.3. Использование параметров

Для повышения гибкости использования процедур, обеспечения возможности их настройки на различные условия выполнения в описании процедуры могут быть заданы формальные параметры, которые являются фактически лишь обозначениями исходных данных, передаваемых в процедуру для обработки, и результатов ее выполнения. Список параметров задается в заголовке процедуры вслед за ее именем.

При вызове процедуры указывается ее имя и, если необходимо, список фактических параметров (аргументов), которые будут подставлены вместо описанных в процедуре формальных параметров и будут использованы при выполнении всех инструкций, включенных в код процедуры. Передаваемые в процедуру аргументы определяют реальные данные, задача обработки которых решается при обращении к процедуре.

Между формальными и фактическими параметрами при вызове процедуры должно быть установлено соответствие. По способу задания этого соответствия различают позиционные и именованные аргументы (параметры).

Позиционные аргументы при вызове процедуры задаются в строго определенном порядке (этот порядок соответствует порядку соответствующих формальных параметров, заданных в списке при описании процедуры), их значения разделяются запятыми. Если значение какого-либо аргумента при обращении к процедуре не задается (это допускается, когда аргумент является необязательным), вместо него ставится запятая, если только пропущенный параметр не является последним в списке. Например:

Answer = InputBox(“Введите имя:”, “Кто Вы?”, ,100, 100)

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

Именованные аргументы позволяют указывать при вызове процедуры значения в произвольном порядке: соответствие между формальными и фактическими параметрами задается по имени. Ниже приведен пример обращения к процедуре Answer, где соответствие между формальными параметрами и передаваемыми в процедуру аргументами устанавливается по имени (символ подчеркивания в конце строки означает, что в следующей строке содержится продолжение оператора):

Answer = InputBox (Prompt := “Введите имя:”, _ Title := “Кто Вы?”, _ Xpos :=100, _ Ypos :=100)

Такой способ передачи аргумента является более информативным при чтении текста программы.

Для передачи аргументов в процедуру существует два способа: передача параметров по ссылке и по значению.

При передаче аргумента по значению создается копия исходного значения (значения фактического параметра) и это значение присваивается соответствующему формальному параметру. Изменения аргумента в процедуре не распространяются на значение переданного фактического параметра. Для того чтобы указать, что аргумент должен передаваться по значению, перед его именем в списке формальных параметров вставляется ключевое слово ByVal.

При передаче аргумента по ссылке копия исходного значения не создается. Соответствующий формальный параметр становится лишь обозначением фактического параметра при выполнении кода процедуры. Все выполняемые над ним действия выполняются над указанным фактическим параметром. Таким образом, в результате выполнения процедуры исходное значение аргумента может быть изменено. Данный способ передачи аргумента задается при описании процедуры с помощью ключевого слова ByRef, записываемого перед именем формального параметра в заголовке процедуры.

По умолчанию аргументы передаются в процедуры по ссылке. Это эффективно, так как все аргументы, передаваемые по ссылке, требуют одинакового времени для передачи и одинакового количества памяти (4 байта) для передачи ссылки (адреса), независимо от типа данных аргумента. При этом следует учитывать, что аргумент, передаваемый в процедуру по ссылке, должен быть того же типа, что и соответствующий формальный параметр.

Если включить ключевое слово ByVal в описание процедуры, то аргумент будет передан по значению. Аргументы, переданные по значению, занимают от 2 до 16 байт на процедуру, в зависимости от типа данных аргументов. Типы данных большего размера требуют на передачу немного больше времени. По этой причине обычно не следует передавать по значению, например, строки.

При описании параметров в процедуре может быть использовано ключевое слово Optional, которое применяется для обозначения тех аргументов, которые не являются обязательными. Если какой-либо параметр не является обязательным, то и все аргументы, следующие за ним в списке формальных параметров, также будут необязательными. Все необязательные параметры имеют тип Variant. Ключевое слово Optional записывается перед именем параметра и описанием способа его передачи.

Ключевое слово ParamArray используется для принятия в процедуре произвольного числа аргументов и упаковки их в массив переменных типа Variant. Такое описание можно использовать только для последнего параметра в списке. Более детальную информацию можно получить в справочном руководстве VBA.

В программах на языке VBA используется несколько видов процедур: подпрограммы, функции, свойства. Процедуры реализуют обработку событий. Более подробно средства создания и вызова процедур рассматриваются ниже.