If условие Then

инструкции

[ ElseIf условие Then

инструкции ]

[ Else

инструкции ]

End If

Выполнение инструкции начинается с проверки первого условия. Если оно истинно, то выполняется первая группа инструкций, после чего программа перейдет к выполнению инструкций, следующих за End If. Если первое условие ложно, то проверяется второе условие и так далее. Количество секций ElseIf может быть любым. Инструкции в секции Else выполняются в том случае, если все условия оказались ложными. Секции ElseIf и Else могут отсутствовать. Заканчивается блочный IF всегда конструкцией End If в отдельной строке. Такая форма инструкции IF позволяет запрограммировать любые ветвления. Среди инструкций, использующихся внутри IF, могут быть другие инструкции IF или циклы.

Пример 2.5. Напишем функцию, которая по дате рождения вычисляет возраст человека на текущую дату. Ниже приведен один из возможных вариантов.

В данном случае использована линейная инструкция IF, но так как строка получилась длинная, мы разбили ее на две, используя символ продолжения.

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

В данном примере использованы вложенные инструкции IF.

Стандартная функция IsNumeric возвращает значение True, если ее аргумент является числом, и False — в противном случае. Обратите внимание, что в этом варианте тип возвращаемого значения функции не указывается специально, так как функция может возвращать что-то еще кроме числа.

Функция CVErr преобразует код ошибки в настоящую ошибку, которая обрабатывается Excel так же, как ошибки, возникающие при вычислении встроенных функций Excel. Константа xlErrValue соответствует ошибке #ЗНАЧ!. Другие константы ошибок: xlErrDiv0 (для ошибки #ДЕЛ/0!), xlErrNA (для ошибки #Н/Д), xlErrName (для ошибки #ИМЯ?), xlErrNull (для ошибки #ПУСТО!), xlErrNum (для ошибки #ЧИСЛО!), xlErrRef (для ошибки #ССЫЛ!).

Для реализации выбора из нескольких вариантов также применяется инструкция Select Case, которая позволяет выполнять одну из нескольких групп инструкций в зависимости от значения выражения:

Select Case выражение

[ Case списокВыражений

инструкции ]...

[ Case Else

инструкции ]