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

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

Во многих случаях вам может потребоваться суммировать все числа в одной ячейке. Например, в ячейке A1 есть текстовая строка Class 2 Grade 1, и результатом сложения этих чисел будет 1 + 2 = 3. В этой статье будут подробно описаны способы добавления чисел в одну ячейку.

Суммирование чисел в одной ячейке с помощью пользовательской функции
Легко суммируйте числа в одной ячейке всего за несколько кликов


Суммирование чисел в одной ячейке с помощью пользовательской функции

Вы можете суммировать числа в одной ячейке с помощью указанной ниже функции, определяемой пользователем.

1. Нажмите другой + F11 клавиши одновременно, чтобы открыть Приложение Microsoft Visual Basic окно.

2. в Приложение Microsoft Visual Basic окна, нажмите Вставить > Модули. А затем скопируйте приведенный ниже VBA в Модули окно.

VBA: сумма чисел в одной ячейке

Function SumNums(pWorkRng As Range, Optional xDelim As String = " ") As Double
	Dim arr As Variant
	Dim xIndex As Long
	arr = Split(pWorkRng, xDelim)
	For xIndex = LBound(arr) To UBound(arr) Step 1
		SumNums = SumNums + VBA.Val(arr(xIndex))
	Next
End Function

3.Нажмите другой + Q ключи, чтобы закрыть Приложение Microsoft Visual Basic окно.

4. Выберите пустую ячейку для вывода результата. Введите в нее формулу ниже и нажмите Enter ключ (A2 - это ячейка, в которой вы будете суммировать отдельные числа).

=SUMNUMS(A2)

5. Затем перетащите маркер заполнения ячейки результата, чтобы применить формулу к другим необходимым ячейкам.

Внимание: Эта пользовательская функция не применяется к ячейкам в числовом формате.


Легко суммируйте числа в одной ячейке всего за несколько кликов

Kutools for ExcelАвтора Суммировать числа в ячейке формула может помочь легко суммировать числа в одной ячейке (включая ячейку текстового формата и ячейку числового формата) всего несколькими щелчками мыши.

Перед применением Kutools for Excel, Пожалуйста, сначала скачайте и установите.

1. Выберите пустую ячейку для вывода результата. А затем нажмите Кутулс > Формула Помощник > Формула Помощник.

2. в Формула Помощник диалоговое окно, настройте следующим образом.

2.1) Найдите и выберите Суммировать числа в ячейке в Выберите формулу коробка;
Советы: Вы можете проверить Фильтр поле введите ключевое слово, чтобы отфильтровать нужную формулу.
2.2). Ячейка поле укажите ячейку, содержащую числа, которые вы будете суммировать;
2.3) Нажмите OK кнопка. Смотрите скриншот:

3. Затем результат заносится в выбранную ячейку. Выберите ячейку результата, а затем перетащите ее маркер заполнения вниз, чтобы получить другие результаты.

  Если вы хотите получить бесплатную пробную версию (30-день) этой утилиты, пожалуйста, нажмите, чтобы загрузить это, а затем перейдите к применению операции в соответствии с указанными выше шагами.


Легко суммировать числа в одной ячейке с помощью Kutools for Excel


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

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

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

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

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
офисный дно
Сортировать комментарии по
Комментарии (8)
Оценок пока нет. Оцените первым!
Этот комментарий был сведен к минимуму модератором на сайте
ОГРОМНОЕ СПАСИБО, ИДЕЯ МОДУЛЯ ПОТРЯСАЮЩАЯ! Я НИКОГДА НЕ ЗНАЛА, ЧТО ОНА СУЩЕСТВУЕТ
Этот комментарий был сведен к минимуму модератором на сайте
Проблема этого инструмента в том, что он добавляет все цифры. Проблема в том, что 125 + 2 — это не 127. Инструмент добавит его как 1 + 2 + 5 + 2. Не знаю, насколько это полезно для тех, кому нужно сложить все числа. Даже в примере это не имеет смысла и не кажется практичным. Я что-то пропустил?
Этот комментарий был сведен к минимуму модератором на сайте
Неправильно, если числа вводятся в ячейку отдельно, например 125 2, а формула вводится в соседнюю ячейку. В ячейке с формулой будет вычислено 127.
Этот комментарий был сведен к минимуму модератором на сайте
Привет Майкл,
Извините за ошибку. Введите следующий код VBA в окно модуля (код), а затем примените эту формулу: =СУММЧИСЛ(A1,"") для суммирования всех цифр в ячейке.

Function SumNums(pWorkRng As Range, Optional xDelim As String = " ") As Double
'Updated by ExtendOffice 20221122
    If pWorkRng.CountLarge > 0 Then Exit Function
    On Error Resume Next
    Application.Volatile
    
    Dim arr As Variant
    Dim xIndex As Long
    If xDelim <> "" Then
        arr = Split(pWorkRng, xDelim)
        For xIndex = LBound(arr) To UBound(arr) Step 1
            SumNums = SumNums + VBA.Val(arr(xIndex))
        Next
    Else
        For xIndex = 1 To Len(pWorkRng) Step 1
            If IsNumeric(Mid(pWorkRng, xIndex, 1)) Then
                SumNums = SumNums + VBA.Val(Mid(pWorkRng, xIndex, 1))
            End If
        Next
    End If
End Function
Этот комментарий был сведен к минимуму модератором на сайте
Вы также можете очень легко просто ввести «=» в ячейке. Итак, если у вас есть ячейка, которая была 3, но вы хотите добавить 1 + 2, это будет «= 1 + 2» в ячейке.
Этот комментарий был сведен к минимуму модератором на сайте
У меня есть список чисел, которые я хочу автоматически добавить 30 к каждому числу в каждой отдельной ячейке. Это возможно?
Этот комментарий был сведен к минимуму модератором на сайте
Как мне добавить +1 цифру к числам в одной ячейке (word или excel или блокнот, не имеет значения). Но на Моей работе часто бывает: 14,17,28,31,35,38,50,53,70,73,80,83,90,93,120,123,135,138,150,153,165,168,180,183,210,213,250,253,275,278,300,303 что-то в этом роде.

И мне нужно сделать их такими: 15,18,29,32,36,39,51,54,71,74,81,84,91,94,121,124,136,139,151,154,166,169,181,184,211,214,251,254,276,279,301,304. Я делаю это вручную, но, может быть, есть быстрый способ сделать это?
Этот комментарий был сведен к минимуму модератором на сайте
Код функции VBA работает очень хорошо. Спасибо. 
Здесь еще нет комментариев
Пожалуйста, оставляйте свои комментарии на английском языке
Публикация как гость
×
Оценить этот пост:
0   Характеристики
Предлагаемые места

Подписывайтесь на Нас

Copyright © 2009 - www.extendoffice.ком. | Все права защищены. Питаться от ExtendOffice, | Карта сайта
Microsoft и логотип Office являются товарными знаками или зарегистрированными товарными знаками Microsoft Corporation в США и / или других странах.
Защищено Sectigo SSL