Выбрать каждую пятую строку - примеры кода VBA

Выбрать каждую 5-ю строку

Представьте, что у нас есть 20000 строк данных в электронной таблице Excel:

Однако как насчет того, чтобы сократить эти данные, например взять каждую 5-ю строку? В этой статье показано, как это можно сделать. Функция Row () дает номер каждой строки:

Функция Mod позволяет нам выполнять арифметические операции по модулю:

= Mod (Число; Делитель)

Выдает остаток от деления «числа» на «делитель». Так например:

= Мод (28,5)

Дает 3 остаток, когда 28 делится на 5.
Итак, мы можем посмотреть на номер строки и увидеть, что происходит, когда мы выполняем над ней арифметические операции по модулю:

= ЕСЛИ (Mod (Строка (); 5) = 0,1,0)

т.е. рассмотрите остаток, когда номер строки делится на 5. Если остаток равен 0, то поместите 1 в ячейку, иначе поставьте ноль. Для удобства я жестко запрограммировал номера строк в приведенной выше таблице. Теперь мы добавляем дополнительный столбец, чтобы понять, когда это произойдет. Формулы будут формулами модуля, как указано выше:

Мы видим, что строки с номерами, которые делятся на 5, имеют модуль 1. Если мы теперь отфильтруем данные, чтобы отображались только единицы:

Если теперь мы выберем только видимые ячейки, а затем скопируем только эти данные, у нас будет подмножество наших данных.

wave wave wave wave wave