Note: The other languages of the website are Google-translated. Back to English

Как посчитать / суммировать ячейки по цветам с условным форматированием в Excel?

В Excel вы можете раскрасить некоторые ячейки, используя условное форматирование. Теперь это руководство расскажет вам о некоторых удобных и простых методах быстрого подсчета или суммирования ячеек по цвету с условным форматированием в Excel.

Подсчет ячеек по цвету шрифта и фону с помощью VBA

Подсчет / сумма ячеек по цвету шрифта с условным форматированием Kutools for Excel хорошая идея3      играть

Подсчет / сумма ячеек по цвету фона с условным форматированием Kutools for Excel хорошая идея3      играть


стрелка синий правый пузырь Подсчет ячеек по шрифту и цвету фона с помощью 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 Sub

3. Нажмите Run или нажмите F5 нажмите клавишу, чтобы запустить код, затем выберите нужный диапазон в диалоговом окне. Смотрите скриншот:
количество документов по условному цвету-1

4. Нажмите OK, затем выберите ячейку, шрифт и цвет фона которой вы хотите подсчитать. Смотрите скриншот:

количество документов по условному цвету-2

5. Нажмите OK. Затем появляется диалоговое окно, в котором указывается, сколько ячеек имеют тот же цвет фона и цвет шрифта, что и выбранная ячейка в диапазоне.

количество документов по условному цвету-3


стрелка синий правый пузырь Подсчет / сумма ячеек по цвету шрифта с условным форматированием Kutools for Excel

В Excel нельзя подсчитывать или суммировать ячейки по цвету шрифта только с условным форматированием. Однако есть удобная надстройка под названием Kutools for Excel которые могут помочь вам быстро решить эту проблему с помощью Считать по цвету функцию.

Kutools for Excel, с более чем 300 удобные функции, облегчающие вашу работу. 

После бесплатная установка Kutools for Excel, сделайте следующее:

1. Выберите диапазон, в котором вы хотите подсчитать или суммировать ячейки по цвету шрифта с условным форматированием, затем щелкните Кутулс Плюс> Считать по цвету. Смотрите скриншот:

количество документов по условному цвету-4

2. Затем в Считать по цвету диалоговое окно, выберите Условное форматирование под Цветовой метод список и шрифт под Тип цвета список. Затем вы можете просмотреть результат подсчета и подведения итогов в диалоговом окне. Смотрите скриншот:

количество документов по условному цвету-5

Внимание: Если вы хотите вывести результат расчета в виде отчета, вы можете нажать Создать отчет iп Считать по цвету диалог, то отчет будет построен в новой книге. Смотрите скриншот:

количество документов по условному цвету-6      количество документов по условному цвету-7


Подсчет / сумма ячеек по цвету фона с условным форматированием Kutools for Excel

Если вы хотите подсчитать или суммировать ячейки по цвету фона с условным форматированием, вы также можете применить Считать по цвету полезности Kutools for Excel.

1. Выберите диапазон, в котором вы хотите подсчитать или суммировать ячейки по цвету фона с условным форматированием, затем щелкните Кутулс Плюс > Считать по цвету.

После бесплатная установка Kutools for Excel, сделайте следующее:

2. Затем в Считать по цвету диалоговое окно, выберите Условное форматирование под Цветовой метод список и проверка данных под Тип цвета список. Затем вы можете просмотреть результат подсчета и подведения итогов в диалоговом окне. Смотрите скриншот:

количество документов по условному цвету-8

Внимание: Если вы хотите вывести результат расчета в виде отчета, вы можете нажать Создать отчет в Считать по цвету диалог, то отчет будет построен в новой книге. Смотрите скриншот:

количество документов по условному цвету-9

Щелкните здесь, чтобы узнать больше о подсчете по цвету.

Наконечник.Работы С Нами Считать по цвету Вы также можете подсчитывать / суммировать / усреднять ячейки по цвету фона или цвету шрифта только со стандартным форматированием или как стандартным, так и условным форматированием. Если вы хотите применить подсчет по цвету без ограничений в течение 30 дней, пожалуйста, скачайте и получите бесплатную пробную версию сейчас.


стрелка синий правый пузырь Вычислить ячейки по цвету шрифта или цвету фона



Лучшие инструменты для работы в офисе

Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма ...
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы... Предотвращение дублирования ячеек; Сравнить диапазоны...
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии...
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом ...
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
  • Более 300 мощных функций. Поддерживает Office / Excel 2007-2019 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
вкладка kte 201905

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
офисный дно
Сортировать комментарии по
Комментарии (7)
Оценок пока нет. Оцените первым!
Этот комментарий был сведен к минимуму модератором на сайте
Позвольте поздравить вас с наиболее понятной и хорошо написанной программой VBA для выполнения такой простой задачи, т. е. подсчета количества ячеек с определенным цветом, полученным из условного форматирования. Это лучше, чем чудовищная программа Пирсона, а его даже не работает, по крайней мере, в Excel 2013. Не работают и другие предполагаемые программы подсчета, которые я пробовал. Твой единственный!! Это сработало отлично. Спасибо Спасибо спасибо. С наилучшими праздничными пожеланиями, Морт в Далласе
Этот комментарий был сведен к минимуму модератором на сайте
hi


пожалуйста, отправьте приведенный выше код VBA, мне нужен тот же код, пожалуйста, помогите.
Этот комментарий был сведен к минимуму модератором на сайте
Здравствуйте,
Как изменить код для ячейки, содержащей условное форматирование? Потому что он считает фон «пустым».


Благодарю.
Этот комментарий был сведен к минимуму модератором на сайте
Извините, я понятия не имею о коде VBA.
Этот комментарий был сведен к минимуму модератором на сайте
Привет.

VBA đếm ô màu rất hay, tuy nhiên bạn có thể sửa giup minh để kết quả khong hiện thành msg box mà hiện luon trên ôđh ông ông chợn đng thêm cả ham сумма, в среднем nữa thì càng tốt: D . Пишите của mình la tranvanlong.dne@gmail.com. Минь кам ơн.
Этот комментарий был сведен к минимуму модератором на сайте
Не могли бы вы научить меня кодам VBA, я хотел бы изучить VBA, используя таблицу Excel
Этот комментарий был сведен к минимуму модератором на сайте
Здравствуйте,

Это отличная часть VBA и отлично работает. Можете ли вы изменить этот код, чтобы сделать его функцией, а затем использовать в качестве формулы?

например
=DisplayFormatCount(A14:E14,A2,False) для подсчета цвета фона (диапазон подсчета, ячейка соответствия цвета, тип)

=DisplayFormatCount(C29:D29,A2,True) для подсчета цвета шрифта

Я хотел бы вам что-то вроде этого для формы ввода многих таблиц и полей проверки, которые являются обязательными. Тогда я смогу подсчитать, сколько полей не были заполнены правильно.


ура
Здесь еще нет комментариев
Оставляйте свои комментарии
Публикация как гость
×
Оценить этот пост:
0   Характеристики
Предлагаемые места