Пример 5.1

Занятие 5

Цикл For … Next

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

Цикл For … Next применяют в тех случаях, когда заранее известно, сколько раз нужно выполнить инструкции:

For СчетчикЦикла = Старт То Стоп [ Step Шаг ]

Инструкции

Next [ СчетчикЦикла ]

Счетчик цикла – это обычная переменная. В начале выполнения цикла ее значение равно Старт. После выполнения инструкций тела цикла Next изменяет счетчик цикла на величину Шаг. Если после изменения счетчик меньше или равен Стоп, то тело цикла выполняется еще раз. Шаг по умолчанию равен единице, но можно сделать его любым, в том числе отрицательным. Если шаг отрицательный, то цикл выполняется до тех пор, пока значение счетчика больше или равно Стоп. В случае вложенных циклов рекомендуется после Next указывать имя переменной цикла. Для досрочного выхода из цикла используется инструкция Exit For.

Пример 5.1.

Напишем макрос, который во 2 столбце, начиная с 10 строки, размещает 5 подряд идущих целых чисел, начиная с 1.

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

Создадим более универсальную версию этого макроса: значения 1, 2, 3, … записываются в текущем столбце, начиная с ячейки, в которой находится курсор. Количество значений вводится с помощью диалогового окна InputBox.

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