Как подсчитать/просуммировать ячейки по цветам с условным форматированием в Excel?
В Excel вы можете раскрасить некоторые ячейки, используя условное форматирование. В этом руководстве будут представлены удобные и простые методы для быстрого подсчета или суммирования ячеек по цвету с использованием условного форматирования в Excel.
Подсчет ячеек по цвету шрифта и фону с помощью VBA
Подсчет/суммирование ячеек по цвету шрифта с условным форматированием с помощью Kutools для Excel 
Подсчет/суммирование ячеек по цвету фона с условным форматированием с помощью Kutools для Excel
Подсчет ячеек по цвету шрифта и фона с помощью VBA
В Excel только код VBA может быстро подсчитывать ячейки на основе определенного цвета шрифта и фона.
1. Нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic для приложений.
2. Щелкните Вставка > Модуль и скопируйте и вставьте следующий код VBA в открывшееся окно Модуля.
VBA: Подсчет ячеек на основе цвета шрифта и фона.
Sub DisplayFormatCount()
'Updateby20150305
Dim Rng As Range
Dim CountRange As Range
Dim ColorRange As Range
Dim xBackColor As Long
Dim xFontColor As Long
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set CountRange = Application.Selection
Set CountRange = Application.InputBox("Count Range :", xTitleId, CountRange.Address, Type: = 8)
Set ColorRange = Application.InputBox("Color Range(single cell):", xTitleId, Type: = 8)
Set ColorRange = ColorRange.Range("A1")
xReturn = 0
For Each Rng In CountRange
qqq = Rng.Value
xxx = Rng.DisplayFormat.Interior.Color
If Rng.DisplayFormat.Interior.Color = ColorRange.DisplayFormat.Interior.Color Then
xBackColor = xBackColor + 1
End If
If Rng.DisplayFormat.Font.Color = ColorRange.DisplayFormat.Font.Color Then
xFontColor = xFontColor + 1
End If
Next
MsgBox "BackColor is " & xBackColor & Chr(10) & "FontColor is " & xFontColor
End Sub3. Щелкните Выполнить кнопку или нажмите F5 клавишу для запуска кода, затем выберите диапазон, который вам нужен, в появившемся диалоговом окне. См. скриншот:
4. Нажмите OK, затем выберите ячейку, чей цвет шрифта и фона вы хотите использовать для подсчета ячеек. См. скриншот:
5. Нажмите OK. Затем появится диалоговое окно, которое сообщит вам, сколько ячеек имеют одинаковый цвет фона и цвет шрифта с выбранной ячейкой в диапазоне.
Подсчет/суммирование ячеек по цвету шрифта с условным форматированием с помощью Kutools для Excel
В Excel вы не можете подсчитывать или суммировать ячейки по цвету шрифта только с помощью условного форматирования. Однако есть удобный плагин под названием Kutools для Excel, который поможет вам быстро решить эту проблему с помощью функции Подсчет по цвету.
После бесплатной установки Kutools для Excel выполните следующие действия:
1. Выберите диапазон, который вы хотите подсчитать или просуммировать ячейки по цвету шрифта с условным форматированием, затем нажмите Kutools Plus> Подсчет по цвету. См. скриншот:
2. Затем в диалоговом окне Подсчет по цвету выберите Условное форматирование в списке Метод цвета и Шрифт в списке Тип цвета. После этого вы сможете увидеть результат подсчета и суммирования в диалоговом окне. См. скриншот:
Примечание: Если вы хотите вывести результат расчета в виде отчета, вы можете нажать Создать отчет в диалоговом окне Подсчет по цвету, затем отчет будет создан в новой книге. См. скриншот:
Подсчет/суммирование ячеек по цвету фона с условным форматированием с помощью Kutools для Excel
Если вы хотите подсчитать или просуммировать ячейки по цвету фона с условным форматированием, вы также можете применить инструмент Подсчет по цвету из Kutools для Excel.
1. Выберите диапазон, который вы хотите подсчитать или просуммировать ячейки по цвету фона с условным форматированием, затем нажмите Kutools Plus > Подсчет по цвету.
После бесплатной установки Kutools для Excel выполните следующие действия:
2. Затем в диалоговом окне Подсчет по цвету выберите Условное форматирование в списке Метод цвета и Фон в списке Тип цвета. После этого вы сможете увидеть результат подсчета и суммирования в диалоговом окне. См. скриншот:
Лучшие инструменты для повышения продуктивности в Office
Повысьте свои навыки работы в 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.
- Комплексный набор — надстройки для Excel, Word, Outlook и PowerPoint плюс Office Tab Pro
- Один установщик, одна лицензия — настройка занимает считанные минуты (MSI-совместимо)
- Совместная работа — максимальная эффективность между приложениями Office
- 30-дневная полнофункциональная пробная версия — без регистрации и кредитной карты
- Лучшее соотношение цены и качества — экономия по сравнению с покупкой отдельных надстроек