Здравствуйте, есть код в котором цикл For перебирает значения, подскажите, пожалуйста, как циклу For задать несколько значений
Мой код:
А нужно в For добавить еще один диапазон от 10 до 20, например. Действия в теле цикла будут выполняться те же.
Должно быть что-то вроде
Мой код:
Код |
---|
For Stolb = 1 To name.Column With Cells(ActiveCell.Row + 1, Stolb) .Borders(xlEdgeTop).LineStyle = xlNone .Interior.Color = vbWhite End With Next |
Должно быть что-то вроде
Код |
---|
For Stolb = 1 To name.Column, 10 to 20 |