Как суммировать или подсчитать числа, выделенные полужирным шрифтом, в диапазоне ячеек Excel?
Если на листе у вас есть диапазон данных, содержащий полужирные числа, и вы хотите суммировать или подсчитывать только те из них, что выделены полужирным шрифтом, можно сделать это вручную — но это займёт уйму времени. Как быстро и легко суммировать или подсчитать только полужирные значения в Excel?
Подсчёт полужирных чисел в диапазоне с помощью пользовательской функции (VBA и формула)
Суммирование полужирных чисел в диапазоне с помощью пользовательской функции (VBA и формула)
Несколько щелчков для подсчёта и суммирования Полужирный в диапазоне с помощью Kutools для Excel
Подсчёт полужирных чисел в диапазоне с помощью пользовательской функции
Следующая пользовательская функция поможет вам быстро получить количество Полужирный. Выполните следующие действия:
1. Удерживая нажатыми клавиши ALT + F11, откройте окно Microsoft Visual Basic для приложений.
2. Нажмите Вставка > Модуль и вставьте приведённый ниже код в окно Модуль.
Код 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. Затем нажмите клавишу Enter, и вы получите количество ячеек с полужирным шрифтом в диапазоне A1:C9.
Примечание: A1:C9 в формуле указывает диапазон, к которому применяется функция подсчёта ячеек с полужирным форматированием; вы можете изменить его по своему усмотрению.
Суммирование полужирных чисел в диапазоне с помощью пользовательской функции
Если вы хотите суммировать только полужирные числа в диапазоне данных, создайте для этого пользовательскую функцию.
1.Удерживая нажатыми клавиши ALT + F11, откройте окно Microsoft Visual Basic для приложений.
2. Нажмите Вставка>Модульи вставьте следующий код в окно Модуль.
Код 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. Затем сохраните этот код и введите формулу =sumbold(A1:C9) в пустую ячейку (см. скриншот):
4. Затем нажмите клавишу Enter, и все полужирные числа в диапазоне A1:C9 будут сложены. См. скриншот:
Примечание: A1:C9 в формуле указывает диапазон, к которому применяется функция суммирования полужирных значений; вы можете изменить его по своему усмотрению.
Несколько щелчков для подсчёта и суммирования Полужирный в диапазоне с помощью Kutools для Excel
Вы можете легко подсчитать или просуммировать все полужирные значения в диапазоне всего за несколько щелчков — без сложного кода VBA и запоминания формул.
1. Чтобы подсчитать полужирный текст, выберите пустую ячейку для размещения результата и нажмите Kutools > Расширенные функции > Статистика и математика > COUNTBYFONTBOLD.
Чтобы просуммировать значения, выделенные полужирным, нажмите Kutools > Расширенные функции > Статистика и математика > SUMBYFONTBOLD. См. скриншот:
2. В диалоговом окне Аргументы функции укажите в поле «Ссылка» диапазон с полужирным форматированием, который необходимо подсчитать или суммировать, затем нажмите кнопку ОК.
Количество или сумма всех полужирных значений в ограниченном диапазоне теперь отображается в выбранной ячейке. См. скриншот:
Kutools для Excel— раскройте весь потенциал Excel с помощью более чем 300 незаменимых инструментов, которые ускоряют и упрощают вашу работу, а также воспользуйтесь возможностями ИИ для более разумной обработки данных и повышения продуктивности.Получить сейчас
Демонстрация: Подсчёт и суммирование Полужирный в диапазоне с помощью Kutools для Excel
Связанные статьи:
Как определить и выделить все Полужирный или текст в Excel?
Лучшие инструменты повышения продуктивности в 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-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек