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

Public Function Процент (число)

Процент = число*0.01/100

End Function

 

Функция может иметь аргумент Число. Аргумент Число может быть числом или ссылкой на ячейку рабочего листа. Величина процента является тем значением, которое возвращает функция.

 

В VBA существуют определённые правила для имён процедур и функций.

Первые три символа имени должны быть буквами

Имя может содержать буквы, цифры и знаки подчёркивания

Имя не может содержать пробелы, точки, запятые, восклицательные знаки и символы @, &, $, #

Имя не должно иметь более 255 символов

1. Объявление типа переменной

 

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

Типы данных в VBA

 

Таблица 1

Тип данных	Размер в байтах	Диапазон значений
Byte	1	0 … 255
Integer	2	-32768 … +32767
Long	4	-2 147 483 648 … +2 147 483 647
Boolean	2	True, False
String	10 + 1 байт на символ	0 … 2 млрд. символов
Variant	16	-1.797693Е308 … -4.9406564Е-324 для отрицательных чисел; 4.9406564Е-324 … 1.79769313Е308 для положительных чисел

 

Для объявления переменной используется оператор Dim. Этот оператор имеет следующий синтаксис:

Dim ИмяПеременной As ТипДанных

 

2. Общие правила написания имени переменной

 

 Имя переменной должны начинаться с буквы

 Имя может содержать буквы, цифры и знаки подчёркивания

 Имя не может содержать пробелы, точки, запятые, восклицательные знаки и символы @, &, $, #

 Имя не должно иметь более 255 символов

 

Можно не указывать тип данных при написании своих процедур и тогда по умолчанию VBA применит для Ваших переменных тип Variant. Но, просмотрев таблицу 1 можно увидеть, что ни один из типов данных не требует 16 байт для сохранения значений переменных. Неплохо бы экономить ресурсы памяти компьютера. Кроме того, не объявляя тип переменных вы рискуете получить результат выполнения Вашей программы, который будет далёк от ожидаемого.

3. Описание констант

 

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

 

Const ИмяКонстанты As ТипДанных = Значение

 

Например:

 

Const Gruppa As Integer = 25

 

 

2. Применение условных операторов

 

До сих пор мы учились вводить данные и присваивать значения переменным. Теперь надо научиться организовывать различные потоки выполнения приложения в зависимости от ситуации, которая складывается в ходе работы программы. Не раз и не два Вы видели в окнах сообщений кнопки Да и Нет, Ок и Cancel, и знаете, что дальнейший ход программы будет зависеть от того, на какой кнопке щёлкнет пользователь.

 

Разветвляющийся алгоритм

 

Алгоритм называется разветвляющимся, если последовательность выполнения шагов алгоритма изменяется в зависимости от выполнения некоторых условий. Условие - это логическое выражение, которое может принимать одно из двух значений: “ДА” - если условие верно (истинно), и “НЕТ” - , если условие неверно (ложно).

 

1. Простой условный оператор

 

Общий вид в алгоритме конструкции простого условного оператора следующий:

 

 

 

 

 

Нет Да

 

 

 

 

 

 

 

 

Синтаксис простого условного оператора, если Вы пишите программу структурно, следующий:

 

If <логическое выражение> Then P1 Else P2

End If

 

Возможна и другая запись:

 

If <логическое выражение> Then P1 Else P2 где If, Then, Else, End If - зарезервированные слова, а P₁, P₂ - операторы.

 

Простой условный оператор работает по следующему алгоритму:

Сначала вычисляется логическое выражение. Если результат есть TRUE (истина), то выполняется оператор P₁, а оператор P₂ пропускается. Если результат есть FALSE (ложь), то выполняется оператор P₂, а оператор P₁ пропускается.

 

2. Сокращённый условный оператор

 

Если необходимо выполнить некоторое действие только при истинности проверяемого условия, то в таком случае применяется сокращённый условный оператор.

Общий вид в алгоритме конструкции сокращённого условного оператора следующий:

Нет Да

 

 

 

 

 

 

Синтаксис сокращённого условного оператора, если Вы пишите программу структурно, следующий:

If <логическое выражение> Then P₁

End If

Возможна и другая запись:

 

If <логическое выражение> Then P₁

где If, Then, Else, End If - зарезервированные слова, а P₁ - оператор.

2. Составной условный оператор

 

Если при некотором условии надо выполнить определённую последовательность операторов, то их объединяют в один составной оператор. Общий вид в алгоритме конструкции составного условного оператора следующий:

 

 

 

 

 

Нет Да

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Синтаксис составного условного оператора, если Вы пишите программу структурно, следующий:

If <логическое выражение> Then

P₁

P₂

.

.

P_N

Else

M₁

M₂

.

.

M_n

End If

 

Возможна и другая запись:

 

If <лог. выраж.> Then P₁ P₂. . P_N Else M₁ M₂ . . M_n

 

где If, Then, Else, End If - зарезервированные слова, а P₁, P₂,P_N, M₁, M₂,M_N - операторы

 

 

2. Многозначные ветвления

 

 

Очень часто приходиться выбирать путь решения задачи не из двух, а из нескольких возможных. В программировании это можно реализовать, используя несколько условных операторов.

 

 

Общий вид в алгоритме конструкции многозначных ветвлений следующий:

 

 

 

 

 

 

 

 

 

Нет Да

 

 

Нет Да

 

Нет Да

 

 

 

 

 

 

 

 

 

 

Синтаксис многозначных ветвлений, если Вы пишите программу структурно, следующий:

 

If <лог. выражение1> Then

P₁

ElseIf <лог. выражение2> Then

P₂

ElseIf <лог. выражение3> Then

P₃

Else

P₄

End If

 

 

 

Возможна и другая запись:

 

If <лог. выражение1> Then P₁ ElseIf <лог. выражение2>Then P₂ ElseIf <лог. выражение3> Then P₃ Else P₄

 

где If, Then, Else, End If - зарезервированные слова, а P₁, P₂,P₃ P_4,- операторы

Алгоритм работы такой конструкции следующий: если логическое выражение1 истинно, то выполняется оператор или блок операторов, следующих за конструкцией Then, в противном случае этот блок пропускается. Если логическое выражение, следующее за оператором If ложно, то анализируется логическое выражение, следующее за ElseIf. Если оно истинно, то выполняется оператор или блок операторов, следующих за Then, а остальные операторы пропускаются. Операторы, следующие за последним Else, выполняются лишь в том случае, если ложны все логические выражения в конструкциях If. Любая встретившаяся часть Else принадлежит ближайшей к ней части Then условного оператора. Условные операторы If в такой конструкции называются вложенными.

Рассмотрим пример использования простого условного оператора If.