Note: The other languages of the website are Google-translated. Back to English
Увійти  \/ 
x
or
x
Реєстрація  \/ 
x

or

Як підрахувати та підсумувати клітинки на основі кольору тла в Excel?

Припустимо, у вас є ряд комірок з різними кольорами фону, наприклад, червоний, зелений, синій тощо, але тепер вам потрібно підрахувати, скільки комірок у цьому діапазоні має певний колір фону, і підсумувати кольорові комірки з однаковим певним кольором . В Excel немає прямої формули для обчислення суми та кількості кольорових клітинок, тут я познайомлю вас із деякими способами вирішення цієї проблеми.


Підрахувати та підсумувати кольорові клітинки за фільтром та ПІДЗНАЧ

Припустимо, у нас є таблиця продажів фруктів, як показано на знімку екрана, і ми підрахуємо або підсумуємо кольорові клітинки у стовпці Сума. У цій ситуації ми можемо відфільтрувати стовпець Сума за кольором, а потім легко підрахувати або підсумувати відфільтровані кольорові клітинки за допомогою функції СУБТОТАЛЬ в Excel.

1. Виділіть порожні клітинки, щоб увійти до функції SUBTOTAL.

  1. Щоб підрахувати всі клітинки з однаковим кольором тла, введіть формулу = ПІДЗВІТ (102, E2: E20);
  2. Щоб підсумувати всі клітинки з однаковим кольором тла, введіть формулу = ПІДЗВІТ (109, E2: E20);


примітки: В обох формулах E2: E20 - це стовпець Сума, що містить кольорові клітинки, і ви можете змінювати їх, як вам потрібно.

2. Виберіть заголовок таблиці та натисніть дані > фільтр. Дивіться знімок екрана:

3. Клацніть піктограму Фільтр  у колонці заголовка стовпця Сума та натисніть Фільтр за кольором і вказаний колір ви будете підраховувати послідовно. Дивіться знімок екрана:

Після фільтрування обидві формули SUBTOTAL автоматично підраховують і підсумовують усі відфільтровані кольорові клітинки у стовпці Сума. Дивіться знімок екрана:

примітки: Цей метод вимагає, щоб кольорові клітинки, які ви порахуєте або підсумували, знаходились в одному стовпці.

Один клік для підрахунку, підсумовування та середнього значення кольорових клітинок у Excel

З відмінним Підрахувати за кольором особливість Kutools для Excel, Ви можете швидко підрахувати, підсумувати та усереднити комірки за вказаним кольором заливки або кольором шрифту лише одним клацанням миші в Excel. Крім того, ця функція також визначатиме максимальне та мінімальне значення клітинок за кольором заливки або кольором шрифту. Повнофункціональна безкоштовна пробна версія 30 днів!
кількість оголошень за кольором 2

Kutools для Excel - Включає більше 300 зручних інструментів для Excel. Повна функціональна безкоштовна пробна версія 30 днів, кредитна картка не потрібна! Get It Now

Підрахувати або підсумувати кольорові клітинки за допомогою функції GET.CELL

У цьому методі ми створимо іменований діапазон за допомогою функції GET.CELL, отримаємо кольоровий код комірок, а потім легко підрахуємо або підсумуємо за кольоровим кодом в Excel. Будь ласка, виконайте наступне:

1. Клацання Формули > Визначте ім’я. Дивіться знімок екрана:

2. У діалоговому вікні «Нова назва», будь-ласка, виконайте наведені нижче знімки екрана:
(1) Введіть ім'я у полі Ім'я;
(2) Введіть формулу = GET.CELL (38, аркуш4! $ E2) у полі Звертається до (увагу: у формулі, 38 означає повернення клітинного коду, і Аркуш4! $ E2 це перша комірка в стовпці Сума, крім заголовка стовпця, який потрібно змінити на основі даних таблиці.)
(3) Клацніть на OK кнопки.

3. Тепер додайте новий стовпець Колір прямо до вихідної таблиці. Далі введіть формулу = NumColor та перетягніть маркер автозаповнення, щоб застосувати формулу до інших комірок у стовпці Колір. Дивіться знімок екрана:
примітки: У формулі, NumColor - це названий діапазон, який ми вказали на перших 2 кроках. Вам потрібно змінити його на вказану вами назву.

Тепер кольоровий код кожної комірки в стовпці Сума повертається в Колонна колонка. Дивіться знімок екрана:

4. Скопіюйте та перелічіть колір заливки в порожньому діапазоні на активному аркуші та введіть формули біля нього, як показано на знімку екрана нижче:
A. Щоб порахувати клітинки за кольором, введіть формулу = COUNTIF ($ F $ 2: $ F $ 20, NumColor);
B. Щоб підсумувати клітинки за кольором, введіть формулу = SUMIF ($ F $ 2: $ F $ 20, NumColor, $ E $ 2: $ E $ 20).

примітки: В обох формулах, $ F $ 2: $ F $ 20 - стовпець Колір, NumColor - вказаний іменований діапазон, $ E $ 2: $ E $ 20 - стовпець суми, і ви можете змінювати їх, як вам потрібно.

Тепер ви побачите, що клітинки у стовпці Сума підраховуються та підсумовуються за кольорами заливки.


Підрахувати та підсумувати комірки на основі певного кольору заливки за допомогою функції, визначеної користувачем

Якщо припустити, що кольорові клітини розсіюються в діапазоні, як показано на знімку екрана, обидва наведені вище методи не можуть підрахувати або підсумувати кольорові клітинки. Тут цей метод запровадить VBA для вирішення проблеми.

1. Утримуйте клавішу ALT + F11 і відкриває Microsoft Visual Basic для додатків вікна.

2. Клацання Insert > Модуліта вставте наступний код у вікно модуля.

VBA: Підрахувати та підсумувати комірки на основі кольору тла:

Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As Boolean)
Dim rCell As Range
Dim lCol As Long
Dim vResult
lCol = rColor.Interior.ColorIndex
If SUM = True Then
For Each rCell In rRange
If rCell.Interior.ColorIndex = lCol Then
vResult = WorksheetFunction.SUM(rCell, vResult)
End If
Next rCell
Else
For Each rCell In rRange
If rCell.Interior.ColorIndex = lCol Then
vResult = 1 + vResult
End If
Next rCell
End If
ColorFunction = vResult
End Function

3. Потім збережіть код і застосуйте таку формулу:
A. Підрахуйте кольорові клітини: = кольорова функція (A, B: C, FALSE)
B. Підсумуйте кольорові клітинки: = кольорова функція (A, B: C, TRUE)

Примітка: У наведених вище формулах A - клітинка з певним кольором тла, для якого потрібно обчислити підрахунок і суму, та B: C - діапазон комірок, в якому потрібно обчислити підрахунок і суму.

4. Візьміть, наприклад, наступний знімок екрана, введіть формулу= кольорова функція (A1, A1: D11, FALSE) для підрахунку жовтих клітин. І скористайтеся формулою = кольорова функція (A1, A1: D11, TRUE) підсумувати жовті клітини. Дивіться знімок екрана:

5. Якщо ви хочете підрахувати та підсумувати інші кольорові клітинки, повторіть крок 4. Тоді ви отримаєте такі результати:


Підрахувати та підсумувати комірки на основі певного кольору заливки за допомогою функцій Kutools

Kutools для Excel також підтримує деякі корисні функції, які допомагають користувачам Excel робити спеціальні розрахунки, зазначає підрахунок за кольором фону клітинки, суму за кольором шрифту тощо.

Kutools для Excel - Включає більше 300 зручних інструментів для Excel. Повна функціональна безкоштовна пробна версія 30 днів, кредитна картка не потрібна! Безкоштовна пробна версія зараз!

1. Виділіть порожню комірку, куди ви поміщаєте результати підрахунку, і натисніть Кутулс > Функції Kutools > Статистика та математика > COUNTBYCELLCOLOR. Дивіться знімок екрана:

2. У діалоговому вікні "Аргументи функцій", будь ласка, вкажіть діапазон, до якого ви будете підраховувати кольорові клітинки в Посилання виберіть клітинку, яка заповнена вказаним кольором фону в полі Color_index_nr і натисніть на OK кнопку. Дивіться знімок екрана:

Примітки:
(1) Ви також можете ввести вказану функцію Kutools = COUNTBYCELLCOLOR ($ A $ 1: $ E $ 20, G2)  безпосередньо в порожній комірці або рядку формул, щоб отримати результати підрахунку;
(2) Клацніть Кутулс > Функції Kutools > Статистика та математика > SUMBYCELLCOLOR або типу = SUMBYCELLCOLOR ($ A $ 1: $ E $ 20, G2) у порожній комірці безпосередньо для підсумовування комірок на основі вказаного кольору фону.
Застосувати COUNTBYCELLCOLOR і SUMBYCELLCOLOR функції для кожного кольору фону окремо, і ви отримаєте результати, як показано нижче:

Функції Kutools містять ряд вбудованих функцій, які допомагають користувачам Excel легко обчислювати, в тому числі Кількість / сума / середнє Видимі клітинки, Підрахувати / підсумувати за кольором клітини, Кількість / сума за кольором шрифту, Порахувати символів, Підрахувати шрифтом жирним шрифтом, І т.д. Отримайте безкоштовну пробну версію!


Підрахувати та підсумувати комірки на основі певного кольору заливки за допомогою Kutools для Excel

За допомогою вищезазначеної користувальницької функції вам потрібно вводити формулу по одному, якщо існує безліч різних кольорів, цей метод буде нудним та трудомістким. Але якщо у вас є Kutools для ExcelАвтора Підрахувати за кольором Ви можете швидко створити звіт про кольорові клітинки. Ви можете не тільки підрахувати та підсумувати кольорові клітинки, але й отримати середнє, максимальне та мінімальне значення кольорового діапазону.

Kutools для Excel - Включає більше 300 зручних інструментів для Excel. Повна функціональна безкоштовна пробна версія 30 днів, кредитна картка не потрібна! Безкоштовна пробна версія зараз!

1. Виберіть діапазон, який ви хочете використовувати, і натисніть Kutools Plus > Підрахувати за кольором, див. скріншот:

2. І в Підрахувати за кольором діалоговому вікні, будь-ласка, виконайте наведені нижче знімки екрана:
(1) Виберіть Стандартне форматування від Колірний метод випадаючий список;
(2) Виберіть фон від Тип підрахунку випадаючий список.
(3) Натисніть кнопку Створити звіт.

примітки: Щоб підрахувати та підсумувати кольорові клітинки за певним умовним кольором форматування, виберіть Умовне форматування від Колірний метод випадаючий список у верхньому діалоговому вікні або виберіть Стандартне та умовне форматування зі спадного списку підрахувати всі клітинки, заповнені зазначеним кольором.

Тепер ви отримаєте нову книгу зі статистикою. Дивіться знімок екрана:

повне г, повне г,, показали, від, номер, XNUMX Підрахувати за кольором функція обчислює (Count, Sum, Average, Max тощо) клітинки за кольором тла або кольором шрифту. Отримайте безкоштовну пробну версію!


Пов'язана стаття:


Демонстрація: підрахувати та підсумувати комірки на основі фону, умовного кольору форматування:


Kutools для Excel включає більше 300 зручних інструментів для Excel, які можна спробувати без обмежень протягом 30 днів. Завантажте та безкоштовно пробну версію зараз!

Найкращі інструменти для підвищення продуктивності офісу

Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%

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

Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Emma Olivia · 9 days ago
    HERBAL DR OKUOFOH WHO PREPARE HERBAL MEDICINE TO CURE ALL KINDS OF DISEASES INCLUDING HERPES DISEASE.
    I have been battling this Herpes disease for almost A year now....I tried all possible means to get cure from my Herpes Disease but all to be in vain until i saw a post in a health forum about a herbal Dr. Okuofoh who prepare herbal medicine to cure all kind of diseases including Herpes Disease, at first i doubted if it was real but decided to give it a try...when i contact Dr Okuofoh via his email (drokuofohherbalhomehealing@gmail.com ) write him and reply me explain how the process work so after ordering for the medicine I got it within 3/4 working days through DHL Delivery and I took it according to the way Dr Okuofoh instructed, I was so happy after 2 week I took the medicine there was very big change in my health when I was done with the process I go for test, I found out I am negative...Herpes patients should also get in touch with this herbalist Dr. Okuofoh to get rid of these Herpes Virus forever his whatsapp number +2349050141449.
  • To post as a guest, your comment is unpublished.
    kellytte · 9 months ago
    @Dusty Hi Dusty,
    You can try the Count by Color feature of Kutools for Excel. This feature will help you quickly calculate (count, sum, average, etc.) cells by cell background color or font color, no matter they are formatted by conditional formatting or solidly format.
  • To post as a guest, your comment is unpublished.
    Dusty · 9 months ago
    Is there a way to count different color backgrounds from conditional formatting? The current code as of 7/14/2020 counts them all as default yellow or not at all.
  • To post as a guest, your comment is unpublished.
    kellytte · 10 months ago
    @Dennis Hi Dennis,
    By default, formulas are calculated in Excel until you are turning off the Automatic Formula Calculation. You can enable it by clicking Formulas > Calculation Options > Automatic.
  • To post as a guest, your comment is unpublished.
    Dennis · 10 months ago
    Did anyone find a solution to auto-refresh? I have to manually refresh for it to update. Otherwise, it works great!
  • To post as a guest, your comment is unpublished.
    kellytte · 1 years ago
    @Natasha
    Hi Natasha,
    VBA is good but hard to apply. But below methods may solve your work easily too.
    Method 1: Use Find & Replace feature to select and statistic the color cells
    (1) Press Ctrl + H keys to open the Find and Replace dialog, and then enable the Find tab.
    (2) In the dialog, click Options to show advanced find options.
    (3) Then click Format > Choose Format From Cell, and select one of the specified color cells.
    (4) Click Find All. Now all cells with the same fill color are found out and listed at the bottom of the dialog.
    (5) Select one of found cells, and press Ctrl + A to select all found cells, so that these cells are selected in the worksheet.
    (6) Now you can get the count, average, sum, min, max, etc. of these cells in the task bar.
    Note: If a certain statistic result cannot be found one the taskbar, you can right click the task bar, and then tick the specified item to show it.

    Method 2: Kutools for Excel
    Kutools for Excel supports 30-day free trial. Therefore, you can download it and try its Count by color feature to solve your problem with several clicks only.
  • To post as a guest, your comment is unpublished.
    Natasha · 1 years ago
    Anyone have tips on a max by color VBA?
  • To post as a guest, your comment is unpublished.
    Krits · 1 years ago
    @Mori I try the same you this command =COUNTBYCELLCOLOR is counting only fill color but is not count by condition formating. Please help to improve code thx.
  • To post as a guest, your comment is unpublished.
    Paul · 1 years ago
    awesome fix! count by color over an entire sheet was just what i was looking for and your VBA code was tighter than others that i have looked at. Works like a charm. Thank you, and again, well done.
  • To post as a guest, your comment is unpublished.
    Mori · 2 years ago
    I copied and paste but calculation result is "0" why?? I am using Office 2016.
  • To post as a guest, your comment is unpublished.
    Jku · 2 years ago
    @havdaddy #NAME clearly indicates some keyword is not used in 2019, say, Interior.ColorIndex. Try to figure out changing the code from minimum lines to the full by adding one by one or search for the keywords in Excel/VBA in 2019
  • To post as a guest, your comment is unpublished.
    havdaddy · 2 years ago
    @havdaddy I should probably have also noted that I get a #NAME? error in the cell in which I try to use the function.
  • To post as a guest, your comment is unpublished.
    havdaddy · 2 years ago
    I've copied and pasted as stated and have used this formula for over a year but recently saved the workbook to a new name and now the function doesn't work! I can't figure out what the deal is and I'm losing hair and sleep over it! Loading the original workbook, the formula works like a charm but going back to the new one, it doesn't! I've loaded VBA and tried re-creating the function but it doesn't work. Using Office 2019 - any help appreciated.
  • To post as a guest, your comment is unpublished.
    amirhamzah2107@gmail.com · 2 years ago
    @Karolin Same here, i tried Ctrl+Alt+F9 or Ctrl+Shift+Alt+F9 to recalculate all formula and it works
  • To post as a guest, your comment is unpublished.
    Karolin · 2 years ago
    works fine, except it does not update the value in the totals when i change a cell to a diffrent colour. i have to click in the totals cell again to trigger a recount. Any Ideas how to fix this?
  • To post as a guest, your comment is unpublished.
    Aaron · 2 years ago
    This doesn't work at all. It's total BS.
  • To post as a guest, your comment is unpublished.
    Schmingy · 2 years ago
    I was experiencing issues when attempting to use this function as-is to count/sum the lighter (pastel?) colors, at least in Excel 2016. Some debugging led me to realize that the range of "ColorIndex" values is quite limited, and the function above fails to distinguish between light yellow and light orange, reading both as ColorIndex = 19.

    Using the "Color" attribute, instead (as in "lCol = rColor.Interior.Color" and the two instances of "If rCell.Interior.Color = lCol Then", per the sample code above), resolved the issue.
  • To post as a guest, your comment is unpublished.
    Slegnor · 2 years ago
    @Keerthi I get an error when using ; but using, calculates fine?
  • To post as a guest, your comment is unpublished.
    Hredoy · 2 years ago
    i want to colour in excel by using if function.
  • To post as a guest, your comment is unpublished.
    Keerthi · 2 years ago
    Fix your formula, its not "=colorfunction(A,B:C,FALSE)", but "=colorfunction(A;B:C;FALSE)" its a semi-colon, not a comma.
  • To post as a guest, your comment is unpublished.
    Don Sison · 2 years ago
    This is useful for counting cells with a specific colour. How do you count all cells with any colour?
  • To post as a guest, your comment is unpublished.
    Ashwin · 3 years ago
    Its work for me but does not get Auto refreshed - evey time i have to come back to cell and press enter. Any reason ?
  • To post as a guest, your comment is unpublished.
    Alex · 3 years ago
    @Justin Have you found a solution to this? I am trying to do the same thing but like you said, it does not work with conditional formatting.
  • To post as a guest, your comment is unpublished.
    Tim · 3 years ago
    @Penny Is there a way to auto-calculate? going into each cell and hitting enter each time colors change is extremely tedious.
  • To post as a guest, your comment is unpublished.
    Erin · 3 years ago
    @andrew.carpenter@gmail.com The module & function can't have the same name. Change your module name to Color_Function instead of ColorFunction.
  • To post as a guest, your comment is unpublished.
    Arjun · 3 years ago
    @Will I used the Code and it was working fine till now. Suddenly it has stopped working. This is a very useful tool for me. Kindly help.
  • To post as a guest, your comment is unpublished.
    Bobo · 3 years ago
    I have a few merged cells in the range, and the formula calculates the count of each cell within merged cell. I need count of each merged cell as 1. Waiting for some help.
  • To post as a guest, your comment is unpublished.
    Paul · 3 years ago
    I had the #NAME Error but I realised that it was because I was spelling COLOR as Colour (UK English Spelling). It worked after I change the spelling.
  • To post as a guest, your comment is unpublished.
    Oana · 3 years ago
    I tried to use this formula in a pivot table (and in a normal excel table) where I've applied conditional formatting to color the cells and it's not working. Do you know why and how can I fix this?
    Thanks!
  • To post as a guest, your comment is unpublished.
    amohuanna · 3 years ago
    @Will Did you check the range value and cell that contains the desired color?
  • To post as a guest, your comment is unpublished.
    andrew.carpenter@gmail.com · 3 years ago
    @kasim I'm having this same problem, and unfortunately this answer makes absolutely zero sense in the English language. If anyone is able to suggest a translation, I'd be very interested in hearing it. Thanks.
  • To post as a guest, your comment is unpublished.
    kasim · 3 years ago
    @Will Please this VBA with the name of MY FUNCTION save as add in format(type). Then you can solve that problem.
  • To post as a guest, your comment is unpublished.
    Penny · 3 years ago
    @kelli.crook9@gmail.com if you go back in the cell text with the formula for summing or counting and hit enter, it will recalculate. Just have to remember to do that when changing colors on the range cells.
  • To post as a guest, your comment is unpublished.
    Will · 3 years ago
    I copied and pasted this code into the module screen but when I went back to the spreadsheet, the ColorFunction only returned the #NAME? error. What am I doing wrong? I have Microsoft Excel for Mac version 15.41.
  • To post as a guest, your comment is unpublished.
    Mike Brannigan · 3 years ago
    @WestwoodMike You can add and update button if someone else is using the file and they don't know about the Alt-Ctrl-F9. just add this line of code to the macro "Application.CalculateFull". it's that same as Alt-Ctrl-F9 just programmed into a button.
  • To post as a guest, your comment is unpublished.
    Jelena · 3 years ago
    Hi


    after applying range we need it jums back to VBA and says Ambiguous name detected: ColourFunction

    can you please help?
  • To post as a guest, your comment is unpublished.
    kelli.crook9@gmail.com · 3 years ago
    this doesn't work if you change the colors in the cells: so if you change yellow to red or yellow to blank, it doesn't change the count. if you add/create new colored cells then yes it updates the count, but if you change the color of a cell that has already been counted, then the count will not update.
  • To post as a guest, your comment is unpublished.
    Casey · 3 years ago
    This has been so useful! Thanks very much for your help
  • To post as a guest, your comment is unpublished.
    Carolyn · 3 years ago
    The =colorfunction WAS working great for me ... got everything as I wanted it to work and then copied the sheet repeatedly ... then around the 10th copied sheet the formula stopped working ... what did I do wrong? How do I fix it?
  • To post as a guest, your comment is unpublished.
    Tim · 3 years ago
    @luisa Luisa,
    When you open VBA, you have VBAProject (sheet1) its the place for makros for THIS SHEET. But you also have VBA Projects (PERSONAL.XLSB). Add module in PERSONAL and paste this makro there. This way you will have function avialable in every file on your computer.
    Im not sure but probably you dont have this PRESONAL.XLSB automaticly, you need to create it.
    Probably not the the fastest way but : click record macro, window will apear where you put name (whatever), shortcut (whatever) and place to store makro (chose personal macros sheet). Click ok, record any makro (puting 1 in cell A1), stop recording. Now you should have PERSONAL.XLSB in the list.
    Hope it works and helps :)
  • To post as a guest, your comment is unpublished.
    luisa · 3 years ago
    hey, we used the colorfunction and it works fine, however as soon as we close the sheet and open it again the next day, we have to copy+paste+save it all over again, is there any way to save so it will always be there? we save the sheet in a folder that's shared within many computers. Thanks!
  • To post as a guest, your comment is unpublished.
    Justin · 3 years ago
    This works great unless you are trying to count colors from conditional formatting. Has anybody figured out how to solve that one?
  • To post as a guest, your comment is unpublished.
    Drew · 3 years ago
    @Ryan Could you share the code you used to "refresh" the macros? I'd greatly appreciate it.
  • To post as a guest, your comment is unpublished.
    Ryan · 3 years ago
    @LiamKennedy1985 Code works perfectly but also ran into the same issue. Solved it by writing a quick macros that 'refreshes' the function(s) in the cells assigned so you have an accurate count as soon as you run the macros. Hope this helps!
  • To post as a guest, your comment is unpublished.
    LiamKennedy1985 · 3 years ago
    @Wendy Any news on this? I am having the same issue. Otherwise perfect :-)
  • To post as a guest, your comment is unpublished.
    Wendy · 3 years ago
    @manali Did you find a solution to this b/c I'm having the same problem.
  • To post as a guest, your comment is unpublished.
    cobalt.kobold@gmail.com · 3 years ago
    @a See my new reply, I've updated it so it will now differentiate between similar colours.
  • To post as a guest, your comment is unpublished.
    cobalt.kobold@gmail.com · 3 years ago
    This doesn't differentiate between similar colours, so I changed it so it calls the HEX value of the colour instead:

    Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As Boolean) As Variant
    Dim rCell As Range
    Dim lCol As Variant
    Dim vResult As Variant
    lCol = rColor.Interior.Color
    If SUM = True Then
    For Each rCell In rRange
    If rCell.Interior.Color = lCol Then
    vResult = WorksheetFunction.SUM(rCell, vResult)
    End If
    Next rCell
    Else For Each rCell In rRange
    If rCell.Interior.Color = lCol Then
    vResult = 1 + vResult
    End If
    Next rCell
    End If
    ColorFunction = vResult
    End Function

    Just remember when applying the formula that A cell of the colour you are looking for and B:C is the range to look in. Also, remember that excel can sometimes not auto-update any change to the cell so you might have to manually do it (or write a function ;-)
  • To post as a guest, your comment is unpublished.
    manali · 3 years ago
    I implemented case 1 and it worked successfully. But whenever I change the color the count does not change automatically. I need to click on Count and press enter. Can't the count be changed automatically?
  • To post as a guest, your comment is unpublished.
    Hellen Hornby · 3 years ago
    Hi I tried the above in Excel and keep getting a 'ambiguous name detected' error message related to the colorfunction. Any thoughts?