KutoolsforOffice — Одно решение — пять мощных инструментов.Меньше усилий — больше результата.

Как быстро закрасить чередующиеся отфильтрованные строки в Excel?

АвторСяоянДата изменения

Чтобы улучшить читаемость, многие пользователи заливают каждую вторую строку в Excel цветом. Быстро справиться с этой задачей поможет условное форматирование. Подробнее см. здесь:Как закрасить чередующиеся строки в Excel?

Однако если требуется закрасить чередующиеся отфильтрованные строки в Excel, вы можете быстро применить цветовую заливку к отфильтрованным строкам следующим образом:

Закраска чередующихся отфильтрованных строк с помощью Использовать условное форматирование
Слишком сложно!

Закраска чередующихся отфильтрованных строк с помощью кода VBA
Для продвинутых пользователей!

Быстрая закраска чередующихся отфильтрованных строк с помощью Kutools для Excel
Просто и удобно для всех пользователей!


стрелка синяя вправо с пузырёмЗакраска чередующихся отфильтрованных строк с помощью Использовать условное форматирование

Для этого необходимо выполнить два основных шага:

A: Закрасить диапазон поочерёдно (шаги 1–5)

B: Отфильтровать нужные данные — заливка автоматически изменится (шаги 6–9)

1. Выделите диапазон, который нужно закрасить. Если фильтр уже применён, обязательно отмените его, чтобы выбрать весь диапазон. В данном примере мы выделяем диапазон A2:G25.

doc-shade-filtered-data1

2. Затем нажмите Главная > Использовать условное форматирование > Создать правило, после чего откроется диалоговое окно Создание правила форматирования.

3. В разделе Выбор типа правила выберите последний пункт — Использовать формулу для определения форматируемых ячеек — и введите в поле формулу «=MOD(SUBTOTAL(3,$A$1:$A2),2)».

doc-shade-filtered-data2

4. Нажмите кнопку Формат, после чего откроется диалоговое окно Установить формат ячейки. Перейдите на вкладку Заливка и выберите желаемый цвет. См. снимок экрана:

doc-shade-filtered-data3

5. Нажмите ОК, после чего вы вернётесь в окно Создание правила форматирования, где в поле Предварительный просмотр будет отображаться выбранный цвет. Нажмите ОК. Теперь выбранный диапазон закрашен поочерёдно.

doc-shade-filtered-data4

6. После завершения описанных выше шагов отфильтруйте данные: нажмите Данные > Фильтр, и Excel добавит раскрывающиеся стрелки в заголовки столбцов.

doc-shade-filtered-data5

7. Затем задайте нужные критерии. В данном примере мы отфильтруем записи, где имя клиента — Minimall. Поместите курсор на раскрывающуюся стрелку в столбце Клиент и щёлкните по ней. В появившемся меню выберите Текстовые фильтры > Содержит… См. снимок экрана:

doc-shade-filtered-data6

8. Откроется диалоговое окно Автофильтр по клиенту. В поле «Содержит» введите Minimall.

doc-shade-filtered-data7

9. Нажмите ОК. Все отфильтрованные строки будут поочерёдно выделены цветом. См. снимок экрана:

doc-shade-filtered-data8


стрелка синяя вправо с пузырём Закраска чередующихся отфильтрованных строк с помощью кода VBA

Первый способ довольно сложен, а приведённый ниже код VBA позволяет быстро поочерёдно закрашивать отфильтрованные строки.

Предположим, что данные уже отфильтрованы. См. снимок экрана:

doc-shade-filtered-data9

1. Нажмите Разработчик > Visual Basic, после чего откроется окно Microsoft Visual Basic для приложений. Нажмите Вставка > Модуль и введите в модуль следующий код:

VBA: поочерёдная заливка отфильтрованных строк

Sub ShadeRows()
'Updateby20140529
Dim Rng As Range
Dim WorkRng As Range
Dim shadeIt As Boolean
shadeIt = True
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng.Rows
    If Not Rng.EntireRow.Hidden Then
        Rng.Interior.ColorIndex = _
        IIf(shadeIt, 15, xlNone)
        shadeIt = Not (shadeIt)
    End If
Next
End Sub

2. Нажмите кнопку кнопка запуска VBA, чтобы выполнить код. Появится диалоговое окно Kutools for Excel с предложением выбрать диапазон для заливки. См. снимок экрана:

doc-shade-filtered-data-13

3. Нажмите ОК. Отфильтрованные данные будут выделены поочерёдно. См. снимок экрана:

doc-shade-filtered-data10


стрелка синяя вправо с пузырём Быстрая закраска чередующихся отфильтрованных строк с помощью Kutools для Excel

Kutools для Excel: более 300 удобных надстроек для Excel — и 30-дневная бесплатная пробная версия без ограничений.Скачать сейчас.

С помощью Kutools для Excel можно легко и быстро выделить цветом чередующиеся отфильтрованные строки. Для этого выполните следующие шаги:

1. Выделите отфильтрованные данные, которые нужно закрасить.

2. Нажмите Kutools > Формат > Чередующаяся заливка строк.

3. В диалоговом окне Чередующаяся заливка строк/столбцов установите флажок напротив параметра Строки в разделе Тип заливки, выберите понравившийся цвет в поле Цвет оттенка (раскрывающийся список), установите флажок Использовать условное форматирование в разделе Режим цвета и, наконец, с помощью кнопок Заливать каждые выберите число 1. См. снимок экрана:

doc-shade-filtered-data11

4. Нажмите ОК. Отфильтрованные данные будут последовательно подсвечены. См. снимок экрана:

doc-shade-filtered-data12

Лучшие инструменты повышения продуктивности в Office

🤖KUTOOLS AI Помощник: Преобразуйте Анализ данных с помощью:Интеллектуального выполнения   |  Генерации кода|  Создания пользовательские формулы  |  Анализа данных и построения диаграмм|  Вызова Расширенные функции
Популярные функции:Поиск, выделение или Отметить дубликаты   |  Удалить пустые строки   |  Объединить столбцы или ячеек без потери данных   |  Округление без использования формул
Супер ПОИСК:VLookup по нескольким критериям  |  VLookup по нескольким значениям  |   VLookup по нескольким листам   |   Распознавание нечетких соответствий
Расширенный раскрывающийся список:Быстрое создание выпадающего списка   |  Зависимый выпадающий список   |  Выпадающий список с множественным выбором
Управление столбцами:Добавление заданного количества столбцов|Перемещение столбцов|Переключение видимости скрытых столбцов|Сравнение диапазонов и столбцов
Избранные функции:Сетка фокусировки   |  Просмотр дизайна   |Улучшенная строка формулы   | Управление рабочими книгами и листами   |  Библиотека ресурсов(автотекст)|  Выбор даты   |  Объединить листы  |  Шифрование/Расшифровать ячейки   | Отправка писем по списку   |  Супер фильтр   |   Специальный фильтр(Фильтр ячеек с жирным шрифтом/курсив/зачёркивание…) …
Лучшие наборы инструментов 15:12 Текстовыеинструменты(Добавить текст,Удалить определенные символы, …)|   50+Типыдиаграмм(Диаграмма Ганта, …)|   40+ Практические формулы(Рассчитать возраст на основе даты рождения, …)|   19 Инструментывставки(Вставить QR-код,Вставка изображения по пути, …)|   12 Инструментыпреобразования(Преобразовать в слова,Конвертация валют, …)|   7 Объединить и разделитьИнструменты(Расширенное объединение строк,Разделить ячейки, …)|… и многое другое
Используйте Kutools на предпочитаемом языке — поддержка английского, испанского, немецкого, французского, китайского и ещё 40+ языков!

Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…


Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу

  • Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
  • Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!

Все надстройки Kutools — один установщик

Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.

ExcelWordOutlookTabsPowerPoint
  • Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
  • Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
  • Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
  • 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
  • Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек