Як підсумувати / підрахувати жирні цифри в діапазоні комірок у Excel?

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

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

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

Наступні Визначена користувачем функція допоможе швидко отримати кількість жирних комірок. Будь ласка, зробіть так:

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

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

Код VBA: підраховуйте жирні цифри в діапазоні комірок

Function CountBold(WorkRng As Range)
'Update 20220516
Dim Rng As Range
Dim xCount As Double
For Each Rng In WorkRng
    If Rng.Font.Bold Then
        xCount = xCount + 1
    End If
Next
CountBold = xCount
End Function

3. Потім збережіть цей код і введіть цю формулу = CountBold (A1: C9) в порожню комірку, див. знімок екрана:

4. Потім натисніть Що натомість? Створіть віртуальну версію себе у клавішу, і ви порахуєте жирні клітинки в діапазоні A1: C9.

Примітка:A1: C9 у формулі вказує діапазон, який ви хочете використовувати за допомогою функції для підрахунку жирних клітинок, ви можете змінити це за вашими потребами.

Сумуйте жирні цифри в діапазоні за допомогою функції, визначеної користувачем

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

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

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

Код VBA: підсумовуйте жирні цифри в діапазоні комірок

Function SumBold(WorkRng As Range)
'Update 20220516
Dim Rng As Range
Dim xSum As Double
For Each Rng In WorkRng
    If Rng.Font.Bold Then
        xSum = xSum + Rng.Value
    End If
Next
SumBold = xSum
End Function

3. Потім збережіть цей код і введіть цю формулу = сумний (A1: C9) в порожню комірку, див. знімок екрана:

4. А потім натисніть Що натомість? Створіть віртуальну версію себе у клавіші, усі жирні цифри в діапазоні A1: C9 були додані. Дивіться знімок екрана:

Примітка:A1: C9 у формулі вказує діапазон, який ви хочете використовувати для підсумовування жирних комірок, ви можете змінити його за вашими потребами.

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

YВи можете легко підрахувати або підсумувати всі жирні комірки в діапазоні за кілька кліків, не обробляючи складний код VBA і не запам'ятовуючи формули.

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

А для підсумовування жирних комірок натисніть Кутулс > Функції Kutools > Статистика та математика > SUMBYFONTBOLD. Дивіться знімок екрана:

2. У Fаргументи ункції у діалоговому вікні вкажіть діапазон із напівжирними клітинками, які потрібно підрахувати або підсумувати у полі Довідка, а потім клацніть на OK кнопки.

Тепер підрахунок або підсумовування всіх жирних комірок у вказаному діапазоні негайно заповнюються у вибраній комірці. Дивіться знімок екрана:

Зберігайте посилання на клітинку формули постійним за допомогою Kutools для Excel

Статті по темі:

Як визначити та виділити всі жирні комірки або текст у Excel?