Макросы в Excel написаны на языке, который называется Visual Basic для приложений (VBA). Как и любой другой язык программирования, VBA включает определенные структуры программирования, которые используются для управления выполнением программы. Одна из таких структур — структура For …​ Next. Чаще всего эта структура используется со следующим синтаксисом:

For X = 1 To 99     program statements Next X

Вы не ограничены использованием переменной X; вы можете использовать любую числовую переменную, какую захотите. Вы также не ограничены числами 1 и 99 в первой строке; вы можете использовать любые числа, какие захотите, или можете использовать числовые переменные. Когда выполняется макрос и встречается эта структура, Excel повторяет каждый оператор программы между ключевыми словами For и Next определенное количество раз. В примере синтаксиса операторы будут выполняться 99 раз (от 1 до 99). При первом прохождении через структуру X будет равно 1, во второй раз — 2, затем 3, 4, 5 и так далее, пока на последней итерации не станет равным 99.

Обычно, когда Excel работает со структурой For …​ Next, он увеличивает счетчик на единицу на каждой итерации. Вы также можете добавить модификатор Step в структуру For …​ Next, тем самым изменив значение, на которое увеличивается счетчик. Например, рассмотрим следующий пример:

For X = 1 To 99 Step 5     program statements Next X

В первый раз в этом примере X будет равно 1, а во второй раз X будет равно 6, потому что он был увеличен на 5. Точно так же в третий раз через X будет равно 11. Вы также можете использовать отрицательное значение. числа для значений шага, что позволяет вести счет в сторону уменьшения.

Например, взгляните на следующее:

For X = 24 To 0 Step -3     program statements Next X

В этом примере в первый раз через структуру X равно 24, во второй раз — 21, а в третий раз — 18.

_Примечание: _

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

link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

ExcelTips — ваш источник экономичного обучения Microsoft Excel.

Этот совет (2024 г.) применим к Microsoft Excel 97, 2000, 2002 и 2003.