Функции, определяемые пользователем

И ПРОЦЕДУР

СОЗДАНИЕ И ИСПОЛЬЗОВАНИЕ ФУНКЦИЙ

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

Существует два вида процедур:

· Функция, определяемая пользователем – это функция, которая создается пользователем, а не входит в стандартный набор; функция определяемая пользователем также располагаемся отдельно от основной программы.

· Подпрограмма – представляет собой определенный набор операторов, составленный пользователем и расположенный отдельно от основной программы.

Отличие функции от подпрограммы состоит в том, что:

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

– имя функции должно иметь спецификатор типа для определения типа самой функции.

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

· аргументы, используемые функцией;

· действия, выполняемые функцией;

· значение, возвращаемое функцией.

Функция-процедура имеет следующий синтаксис:

[Private | Public] [Static] Function Name([Arglist]) [As Type]

'комментарий, описывающий функцию

[Инструкции]

[Name = expression]

[Exit Function]

[Инструкции]

[Name = expression]

End Function

Public – Указывает, что процедура Function доступна для всех других процедур во всех модулях;

Private – Указывает, что процедура Function доступна для других процедур только того модуля, в котором она описана;

Static – Указывает, что локальные переменные процедуры Function сохраняются в промежутках времени между вызовами этой процедуры

Name – имя, выбранное для этой функции. При написании имен функций необходимо соблюдать те же правила, что и при написании имен других идентификаторов в VBA: они должны начинаться с буквы, не могут содержать пробелов или каких-либо символов арифметических, логических операторов или операторов отношения и не могут дублировать ключевые слова VBA.

Arglist –список ее аргументов функции (является необязательным).

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

Name = expressionпредставляет присваивание функции, которое указывает VBA, какое значение должна возвращать функция.

Exit Function приводит к немедленному выходы из функции

Функция может иметь аргументы, а может не иметь. Все зависит от конкретной ситуации. Если функция не имеет аргументов в объявлении функции необходимо использовать круглые скобки. Например, можно написать функцию-процедуру, возвращающую имя файла, содержащего текущую рабочую книгу, так, чтобы можно было вставлять имя файла в ячейку рабочего листа. Такой функции не нужны аргументы, ей не требуется никакая внешняя информация для выполнения работы, и она будет иметь подобное объявление:

Function ThisBookName()

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

Строка Name = expression представляет присваивание функции. Присваивание функции указывает VBA, какое значение будет возвращать функция. Присваивание функции использует имя функции-процедуры и присваивает ему значение, как если бы это была переменная. Функции-процедуры могут не иметь совсем или иметь один или несколько различных операторов присваивания функции.

Пример 1. Функция-процедура LenTrim, возвращающая дину строки без начальных или конечных пробелов

Function LenTrim(tStr) ' Определение функции

LenTrim = Len (Trim(tStr)) ' Возвращаемое значение

Дата добавления: 2015-05-10