Developing.ru

как увеличить индекс в цикле FOR
что я имею в веду:
мы определили кол-во заполненных строк на рабочем листе
iLastRow = Cells(ActiveSheet.Rows.Count, 1).End(xlUp).Row
если я добавила в цикле строку, значит и увеличилось кол-во строк, как это грамотно записать в цикл

Rows(index).Insert Shift:=xlDown
iLastRow=iLastRow+1

))
хорошая идея
проблемма что строка

Next index
уже зафиксировала начальный результат iRowLast

не проверял, но думаю, что цикл while Вам поможет...
While index <= iLastRow
...
Wend

Если я ошибаюсь, то тогда делайте бесконечный цикл и в нём
проверяйте условие и делайте выход из цикла... хотя так и некрасиво.. ;-(

да, наверное вы правы, не проверяла, но выглядит логично
спасибо