Как суммировать числа только в скобках в Excel?
Если у вас есть список текстовых строк, и вы хотите сложить все числа в скобках, как показано на скриншоте ниже, как это можно быстро сделать? В этой статье я представлю несколько приемов для суммирования чисел только в скобках в Excel.
Суммирование чисел внутри скобок только с помощью формулы
Чтобы суммировать числа только внутри скобок, сначала можно извлечь числа, которые находятся в скобках, а затем их сложить.
1. Выберите пустую ячейку рядом с ячейкой, где нужно просуммировать числа в скобках, например B2, и введите эту формулу:
=IF(ISERROR(MID(A1,FIND("(",A1)+1,(FIND(")",A1))-(FIND("(",A1)+1))),0,(MID(A1,FIND("(",A1)+1,(FIND(")",A1))-(FIND("(",A1)+1)))+0),
Затем перетащите маркер автозаполнения вниз, чтобы извлечь числа, которые находятся в скобках, из каждой ячейки. Смотрите скриншот:
2. Выберите ячейку, куда будет помещен результат суммирования, и введите =SUM(B1:B8), и нажмите Enter клавишу. Смотрите скриншот:
Раскройте магию Excel с Kutools AI
- Умное выполнение: Выполняйте операции с ячейками, анализируйте данные и создавайте диаграммы — всё это посредством простых команд.
- Пользовательские формулы: Создавайте индивидуальные формулы для оптимизации ваших рабочих процессов.
- Кодирование VBA: Пишите и внедряйте код VBA без особых усилий.
- Интерпретация формул: Легко разбирайтесь в сложных формулах.
- Перевод текста: Преодолейте языковые барьеры в ваших таблицах.
Суммирование чисел внутри скобок только с помощью определенной функции
Вы также можете применить определенную функцию для суммирования чисел внутри скобок.
1. Нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications, нажмите Insert > Module и вставьте следующий код в пустой скрипт.
VBA: Суммирование чисел в скобках
Function SumBracket(Target As Range) As Double
'UpdatebyExtendoffice20160901
Dim xCell As Range
Dim xObjs As Object, xObj As Object
Dim xSum As Double
Set xObjs = CreateObject("VBScript.RegExp")
xSum = 0
With xObjs
.Global = True
.Pattern = "\((\d+(\.\d+)?)\)"
For Each xCell In Target
If xCell.Value <> "" Then
For Each xObj In xObjs.Execute(xCell.Value)
xSum = xSum + xObj.submatches(0)
Next
End If
Next
End With
SumBracket = xSum
End Function
2. Сохраните код и вернитесь к выбору ячейки, которая будет содержать результат, и введите эту формулу =SumBracket(A1:A8), нажмите Enter клавишу. Смотрите скриншот:
Суммирование чисел внутри скобок только с помощью Kutools для Excel
На самом деле, с помощью функции Extract Text из Kutools для Excel можно извлечь числа внутри скобок, а затем применить функцию Sum absolute values для их суммирования.
После установки Kutools для Excel выполните следующие действия: (Бесплатная загрузка Kutools для Excel прямо сейчас!)
1. Выберите строки, из которых нужно извлечь числа в скобках, и нажмите Kutools > Text > Extract Text. Смотрите скриншот:
2. В диалоговом окне Extract Text введите (*) в текстовое поле Text и нажмите Add, чтобы добавить его в список Extract list. Затем нажмите Ok и выберите ячейку для размещения извлеченных чисел в появившемся диалоговом окне, например C1. Смотрите скриншот:
 |  |  |
3. Нажмите OK, и теперь числа в скобках извлечены. По умолчанию числа внутри скобок распознаются как отрицательные, вам нужно суммировать их абсолютные значения.
4. Выберите ячейку, куда будет помещен результат расчета, нажмите Kutools > Formula Helper > Math & Trig > Sum absolute values. Смотрите скриншот:
5. В диалоговом окне Formula Helper выберите диапазон, содержащий извлеченные числа, в текстовое поле Number, в данном случае C1:C8. Нажмите Ok, и абсолютные значения чисел будут добавлены. Смотрите скриншот:
 | |  |
Суммирование чисел внутри скобок
Лучшие инструменты для повышения продуктивности в 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-дневная полнофункциональная пробная версия — без регистрации и кредитной карты
- Лучшее соотношение цены и качества — экономия по сравнению с покупкой отдельных надстроек