VBA Цикл For...Next
Цикл For…Next
Данный цикл является самым простейшим циклом со счетчиком. Он используется когда необходимо повторить действия заранее заданное кол-во раз.
Цикл For…Next имеет следующий синтаксис:
For i = Start To End [Step StepSize]
//операторы//
Next [i]
i – численная переменная VBA (счетчик)
Start – численное выражение, определяет начальное значение для переменной
End – это также численное выражение, определяет конечное значение для переменной.
Цикл по счетчику выделяется ключевыми словами For и Next. После начального For указывается имя переменной, данная переменная (i) будет счетчиком, после знака равенства идёт начальное значение счетчика, а после ключевого слова To - конечное значение счетчика. По умолчанию счётчик работает с шагом равным единице. Можно задавать другое значение (StepSize), на которое будет изменяться «i», включая необязательное ключевое слово Step. При включении ключевого слова Step необходимо задавать значение для изменения переменной «i».
Пример №1:
В нижеуказанном примере, на активном листе, по ячейкам А1:А10 проставляется значение от одного до десяти.
Sub example1 ()
Dim i As Long
For i = 1 To 10
ActiveSheet.Range("A" & i).Value = i
Next i
End Sub
Пример №2:
В следующем примере скрываются первый и второй листы книги.
Sub example2 ()
Dim i As Long
For i = 1 To 2
Sheets(i).Visible = False
Next i
End Sub
Пример №3:
Рассмотрим вариант цикла с Step (шагом) через одну ячейку, в данном случае будут заполнены ячейки через одну (А1,А3,А5,А7,А9).
Sub example3 ()
Dim i As Long
For i = 1 To 10 Step 2
ActiveSheet.Range("A" & i).Value = i
Next i
End Sub
Ссылка на мою статью http://www.excelworld.ru/publ/vba/cycle/for_next/57-1..
Теги: цикл fornext, цикл, проект project, обзоры groove, драйвера groove, vba цикл, vba fornext, vba, microsoft outlook office, fornext,
Рейтинг: 0
Голосов: 0
553 просмотра
Комментарии (1)