Как подсчитать или суммировать ячейки по цветам с помощью условного форматирования в Excel?
В Excel вы можете раскрасить некоторые ячейки с помощью Использовать условное форматирование. В этом руководстве описаны удобные и простые методы быстрого подсчёта или суммирования ячеек по цвету с использованием Использовать условное форматирование в Excel.
Подсчёт ячеек по Цвет шрифта и фону с помощью VBA
Подсчёт ячеек по шрифту и Цвет фона с помощью 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. Нажмите ОК, затем выберите ячейку, шрифт и цвет фона которой вы хотите использовать в качестве основы для подсчёта ячеек. См. снимок экрана:
5. Нажмите ОК. После этого появится диалоговое окно с информацией о количестве ячеек в указанном диапазоне, имеющих тот же цвет фона и цвет шрифта, что и выбранная ячейка.
Подсчёт/суммирование ячеек по Цвет шрифта с помощью Использовать условное форматирование от 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-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек