Есть ответ 👍

Укажите поля которые были заполнены с автозаполнения

181
329
Посмотреть ответы 2

Ответы на вопрос:


Колонка "номер" ( заранее )

Sub ex()       dim y() as integer, x() as integer       dim i as integer, n as integer       range(cells(1, 2), cells(100,       i = 1       do while len(cells(i, 1).value) < > 0               i = i + 1       loop       n = i - 1       redim y(1 to n), x(1 to n)       for i = 1 to n               y(i) = cells(i, 1).value               x(i) = y(i) + i               cells(i, 2).value = x(i)       next i end sub предполагается, что данные располагаются в колонке а, начиная с ячейки а1 в колонку b будет выведен результирующий массив. признак конца считывания - пустая ячейка в колонке а

Популярно: Информатика