как скрыть последовательность строк, где значение не равно 1,31,61,91 и т. д. - PullRequest
0 голосов
/ 15 октября 2018

Я хочу скрыть все строки, кроме строк, имеющих значения 1,31,61,91,121 и т. Д.

Мои значения сортируются и увеличиваются от 1 до 29160

1 Ответ

0 голосов
/ 16 октября 2018

Обновите код, так как я скучаю по интерпретации вашего вопроса (хотите кроме).Для очень большого набора данных рабочая книга может медленно применять фильтрацию из-за пересчетов рабочей таблицы.Этот код VBA скрывает все столбцы, а затем показывает каждую 30-ю строку, и, надеюсь, его легко изменить для вашей цели.

Код VBA:

Sub Hide_Every_nth_Row()
Dim n As Integer

Range("1:29160").EntireRow.Hidden = True 'Hide all rows from row 1 to 29160

For n = 1 To 29160 Step 30 'start from row 1 and loop to row 29160. After every loop it jump 30 rows.
Range(Cells(n, 1), Cells(n, 1)).EntireRow.Hidden = False 'Show the nth Row set as "Step". It check the nth row and Column A (A = 1), but since you show the whole row, the column doesn't matter :)
Next n
End Sub

n = 1:С какой строки начинать.

To 29160: Какой у вас конечный ряд.

Step 30: Сколько шагов для прыжка каждый раз, когда он повторяется, начинается с "n"th значение.

EntireRow.Hidden = False: показать строку.Установите это как True, чтобы скрыть каждую строку.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...