Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Сумма чисел содержащих текст
 
#1
29.07.2019 09:25:43

Добрый день, подскажите формулу для суммирования чисел содержащих текст , например Д2,Ф4,Д4,Д1,Ф2    Д=7 , Ф=6
Нашел макрос

Код
Function SumNumbers(rngS As Range, Optional strDelim As String = " ") As Double
'Update 20141210
    Dim xNums As Variant, lngNum As Long
    xNums = Split(rngS, strDelim)
    For lngNum = LBound(xNums) To UBound(xNums) Step 1
        SumNumbers = SumNumbers + Val(xNums(lngNum))
    Next lngNum
End Function

= SumNumbers (A1)
но хотелось бы через формулу , если это возможно, да и макрос суммирует все числа с любым текстом без разбору.
Изменено: Сергей Шистеров - 29.07.2019 09:57:52
 
 
 
#2
29.07.2019 09:51:34
Если числа всегда одноразрядные:
=СУММПРОИЗВ(--(0&ПРАВБ(C3:I3)))
Если разрядов больше и левый символ не нужен:
=СУММПРОИЗВ(--(0&ПСТР(C3:I3;2;9)))
 
 
 
#3
29.07.2019 09:56:35

Если одна буква перед числом

Код
=СУММПРОИЗВ(ПРАВ(A1:A3;ДЛСТР(A1:A3)-1)*1)
 
 
 
#4
29.07.2019 10:57:34
а если имеется две буквы скажем Д_число и Ф_число и нужно разделить сумму чисел по ним Д_сумма и Ф_сумма?
 
 
 
#5
29.07.2019 11:30:09
Цитата
Сергей Шистеров написал:
имеется две буквы скажем Д_число и Ф_число
Перечисляйте сразу все условия и пример приложите
 
 
 
#6
29.07.2019 12:11:29
приложен пример, там это учтено
 
 
 
#7
29.07.2019 12:23:36
Это другой вопрос, не по теме
 
 
 
#8
31.07.2019 10:26:02
Код
=СУММ(ЕСЛИОШИБКА(ЕСЛИ(ПОИСК("Д";B4:G4);--ПОДСТАВИТЬ(B4:G4;"Д";""));0))
=СУММ(ЕСЛИОШИБКА(ЕСЛИ(ПОИСК("Ф";B4:G4);--ПОДСТАВИТЬ(B4:G4;"Ф";""));0))
Спасибо
 
 
 
Страницы: 1
Наверх