Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Необходима формула подсчета цифр в одной ячейке - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Необходима формула подсчета цифр в одной ячейке
AnnaVR Дата: Четверг, 13.11.2014, 16:09 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Я хочу составить формулу , чтобы она могла посчитать сумму чисел в ячейке excel. в ячейке имеется ряд чисел, разделенных пробелом (или любым другим знаком, но не цифрой, конечно).Как это сделать подскажите:)
 
Ответить
СообщениеЯ хочу составить формулу , чтобы она могла посчитать сумму чисел в ячейке excel. в ячейке имеется ряд чисел, разделенных пробелом (или любым другим знаком, но не цифрой, конечно).Как это сделать подскажите:)

Автор - AnnaVR
Дата добавления - 13.11.2014 в 16:09
VaeV1ctis Дата: Четверг, 13.11.2014, 16:23 | Сообщение № 2
Группа: Пользователи
Ранг: Участник
Сообщений: 58
Репутация: 4 ±
Замечаний: 20% ±

Excel 2010
вот если числа ничем не разделены, то
Код
=ДЛСТР(A1)

а вот как отделить символы от чисел, не знаю(


Сообщение отредактировал Serge_007 - Пятница, 14.11.2014, 09:09
 
Ответить
Сообщениевот если числа ничем не разделены, то
Код
=ДЛСТР(A1)

а вот как отделить символы от чисел, не знаю(

Автор - VaeV1ctis
Дата добавления - 13.11.2014 в 16:23
AnnaVR Дата: Четверг, 13.11.2014, 16:37 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
VaeV1ctis, нет - эта функция считает количество чисел в ячейке... необходимо подсчитать сумму
 
Ответить
СообщениеVaeV1ctis, нет - эта функция считает количество чисел в ячейке... необходимо подсчитать сумму

Автор - AnnaVR
Дата добавления - 13.11.2014 в 16:37
AndreTM Дата: Четверг, 13.11.2014, 16:46 | Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 1762
Репутация: 501 ±
Замечаний: 0% ±

2003 & 2010
AnnaVR, а пример будет?


Skype: andre.tm.007
Donate: Qiwi: 9517375010
 
Ответить
СообщениеAnnaVR, а пример будет?

Автор - AndreTM
Дата добавления - 13.11.2014 в 16:46
AnnaVR Дата: Четверг, 13.11.2014, 16:49 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
55 1303 4 3 583 для примера, должна получиться сумма 1948
 
Ответить
Сообщение55 1303 4 3 583 для примера, должна получиться сумма 1948

Автор - AnnaVR
Дата добавления - 13.11.2014 в 16:49
Russel Дата: Четверг, 13.11.2014, 16:50 | Сообщение № 6
Группа: Друзья
Ранг: Старожил
Сообщений: 1394
Репутация: 320 ±
Замечаний: 0% ±

Excel 2010
AnnaVR, текст по столбцам с разделителем "пробел", потом просто сумма.
Другие варианты - после прочтения Вами Правил и приложения файла excel


QIWI 9173973973
 
Ответить
СообщениеAnnaVR, текст по столбцам с разделителем "пробел", потом просто сумма.
Другие варианты - после прочтения Вами Правил и приложения файла excel

Автор - Russel
Дата добавления - 13.11.2014 в 16:50
AnnaVR Дата: Четверг, 13.11.2014, 16:57 | Сообщение № 7
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Правила прочитала, не студентка:) файл приложила
К сообщению приложен файл: 1782068.xls (16.5 Kb)
 
Ответить
СообщениеПравила прочитала, не студентка:) файл приложила

Автор - AnnaVR
Дата добавления - 13.11.2014 в 16:57
Pelena Дата: Четверг, 13.11.2014, 23:20 | Сообщение № 8
Группа: Админы
Ранг: Местный житель
Сообщений: 19409
Репутация: 4558 ±
Замечаний: ±

Excel 365 & Mac Excel
Вариант с макрофункцией ВЫЧИСЛИТЬ(). Макросы должны быть разрешены. Смотрим диспетчер имён (Ctrl+F3)
К сообщению приложен файл: 4804633.xls (26.5 Kb)


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеВариант с макрофункцией ВЫЧИСЛИТЬ(). Макросы должны быть разрешены. Смотрим диспетчер имён (Ctrl+F3)

Автор - Pelena
Дата добавления - 13.11.2014 в 23:20
AnnaVR Дата: Пятница, 14.11.2014, 08:17 | Сообщение № 9
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Pelena, спасибо огромное!
 
Ответить
СообщениеPelena, спасибо огромное!

Автор - AnnaVR
Дата добавления - 14.11.2014 в 08:17
scriptapplications Дата: Четверг, 14.04.2022, 14:33 | Сообщение № 10
Группа: Проверенные
Ранг: Участник
Сообщений: 68
Репутация: 12 ±
Замечаний: 0% ±

Можно воспользоваться формулой массива для вычисления суммы чисел в ячейке Excel
Если разделитель пробел, формула примет вид:
Код
=СУММ( ЗНАЧЕН( ПСТР( " " &A3&" "; НАЙТИ( СИМВОЛ(3); ПОДСТАВИТЬ( " "&A3&" "; " "; СИМВОЛ(3); СТРОКА( ДВССЫЛ( "1:"&( ДЛСТР(A3) - ДЛСТР( ПОДСТАВИТЬ(A3; " "; "")) + 1)))))+1; НАЙТИ( СИМВОЛ(3); ПОДСТАВИТЬ( " " &A3 & " "; " "; СИМВОЛ(3);СТРОКА( ДВССЫЛ( "1:"&( ДЛСТР(A3) - ДЛСТР( ПОДСТАВИТЬ(A3;" "; "")) +1))) +1)) - НАЙТИ( СИМВОЛ(3); ПОДСТАВИТЬ( " "&A3&" "; " "; СИМВОЛ(3); СТРОКА( ДВССЫЛ( "1:" & (ДЛСТР(A3) - ДЛСТР( ПОДСТАВИТЬ(A3; " "; "")) + 1)))))-1)))

Но эта формула чувствительна к пробелам, если в конце строки стоит пробел, то будет ошибка лучше воспользоваться исправленной формулой:
Код
=СУММ( ЗНАЧЕН( ПСТР( " " & СЖПРОБЕЛЫ( A3 )&" "; НАЙТИ( СИМВОЛ(3); ПОДСТАВИТЬ( " "& СЖПРОБЕЛЫ( A3 )&" "; " "; СИМВОЛ(3); СТРОКА( ДВССЫЛ( "1:"&( ДЛСТР( СЖПРОБЕЛЫ( A3 )) - ДЛСТР( ПОДСТАВИТЬ( СЖПРОБЕЛЫ( A3 ); " "; "")) + 1)))))+1; НАЙТИ( СИМВОЛ(3); ПОДСТАВИТЬ( " " & СЖПРОБЕЛЫ( A3 ) & " "; " "; СИМВОЛ(3);СТРОКА( ДВССЫЛ( "1:"&( ДЛСТР( СЖПРОБЕЛЫ( A3 )) - ДЛСТР( ПОДСТАВИТЬ( СЖПРОБЕЛЫ( A3 );" "; "")) +1))) +1)) - НАЙТИ( СИМВОЛ(3); ПОДСТАВИТЬ( " "& СЖПРОБЕЛЫ( A3 )&" "; " "; СИМВОЛ(3); СТРОКА( ДВССЫЛ( "1:" & (ДЛСТР( СЖПРОБЕЛЫ( A3 )) - ДЛСТР( ПОДСТАВИТЬ( СЖПРОБЕЛЫ( A3 ); " "; "")) + 1)))))-1)))

формулы массива, для старых версий Excel, надо вводить завершающим CTRL+SHIFT+ENTER
 
Ответить
СообщениеМожно воспользоваться формулой массива для вычисления суммы чисел в ячейке Excel
Если разделитель пробел, формула примет вид:
Код
=СУММ( ЗНАЧЕН( ПСТР( " " &A3&" "; НАЙТИ( СИМВОЛ(3); ПОДСТАВИТЬ( " "&A3&" "; " "; СИМВОЛ(3); СТРОКА( ДВССЫЛ( "1:"&( ДЛСТР(A3) - ДЛСТР( ПОДСТАВИТЬ(A3; " "; "")) + 1)))))+1; НАЙТИ( СИМВОЛ(3); ПОДСТАВИТЬ( " " &A3 & " "; " "; СИМВОЛ(3);СТРОКА( ДВССЫЛ( "1:"&( ДЛСТР(A3) - ДЛСТР( ПОДСТАВИТЬ(A3;" "; "")) +1))) +1)) - НАЙТИ( СИМВОЛ(3); ПОДСТАВИТЬ( " "&A3&" "; " "; СИМВОЛ(3); СТРОКА( ДВССЫЛ( "1:" & (ДЛСТР(A3) - ДЛСТР( ПОДСТАВИТЬ(A3; " "; "")) + 1)))))-1)))

Но эта формула чувствительна к пробелам, если в конце строки стоит пробел, то будет ошибка лучше воспользоваться исправленной формулой:
Код
=СУММ( ЗНАЧЕН( ПСТР( " " & СЖПРОБЕЛЫ( A3 )&" "; НАЙТИ( СИМВОЛ(3); ПОДСТАВИТЬ( " "& СЖПРОБЕЛЫ( A3 )&" "; " "; СИМВОЛ(3); СТРОКА( ДВССЫЛ( "1:"&( ДЛСТР( СЖПРОБЕЛЫ( A3 )) - ДЛСТР( ПОДСТАВИТЬ( СЖПРОБЕЛЫ( A3 ); " "; "")) + 1)))))+1; НАЙТИ( СИМВОЛ(3); ПОДСТАВИТЬ( " " & СЖПРОБЕЛЫ( A3 ) & " "; " "; СИМВОЛ(3);СТРОКА( ДВССЫЛ( "1:"&( ДЛСТР( СЖПРОБЕЛЫ( A3 )) - ДЛСТР( ПОДСТАВИТЬ( СЖПРОБЕЛЫ( A3 );" "; "")) +1))) +1)) - НАЙТИ( СИМВОЛ(3); ПОДСТАВИТЬ( " "& СЖПРОБЕЛЫ( A3 )&" "; " "; СИМВОЛ(3); СТРОКА( ДВССЫЛ( "1:" & (ДЛСТР( СЖПРОБЕЛЫ( A3 )) - ДЛСТР( ПОДСТАВИТЬ( СЖПРОБЕЛЫ( A3 ); " "; "")) + 1)))))-1)))

формулы массива, для старых версий Excel, надо вводить завершающим CTRL+SHIFT+ENTER

Автор - scriptapplications
Дата добавления - 14.04.2022 в 14:33
jakim Дата: Четверг, 14.04.2022, 16:17 | Сообщение № 11
Группа: Друзья
Ранг: Старожил
Сообщений: 1216
Репутация: 316 ±
Замечаний: 0% ±

Excel 2010
PQ

[vba]
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"числа", type text}}),
    #"Split Column by Delimiter" = Table.SplitColumn(#"Changed Type", "числа", Splitter.SplitTextByDelimiter(" ", QuoteStyle.Csv), {"числа.1", "числа.2", "числа.3", "числа.4", "числа.5"}),
    #"Changed Type1" = Table.TransformColumnTypes(#"Split Column by Delimiter",{{"числа.1", Int64.Type}, {"числа.2", Int64.Type}, {"числа.3", Int64.Type}, {"числа.4", Int64.Type}, {"числа.5", Int64.Type}}),
    #"Added Custom" = Table.AddColumn(#"Changed Type1", "Пользовательская", each [числа.1]+[числа.2]+[числа.3]+[числа.4]+[числа.5]),
    #"Removed Other Columns" = Table.SelectColumns(#"Added Custom",{"Пользовательская"})
in
    #"Removed Other Columns"
[/vba]
К сообщению приложен файл: 7254853.xls (41.5 Kb)
 
Ответить
Сообщение
PQ

[vba]
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"числа", type text}}),
    #"Split Column by Delimiter" = Table.SplitColumn(#"Changed Type", "числа", Splitter.SplitTextByDelimiter(" ", QuoteStyle.Csv), {"числа.1", "числа.2", "числа.3", "числа.4", "числа.5"}),
    #"Changed Type1" = Table.TransformColumnTypes(#"Split Column by Delimiter",{{"числа.1", Int64.Type}, {"числа.2", Int64.Type}, {"числа.3", Int64.Type}, {"числа.4", Int64.Type}, {"числа.5", Int64.Type}}),
    #"Added Custom" = Table.AddColumn(#"Changed Type1", "Пользовательская", each [числа.1]+[числа.2]+[числа.3]+[числа.4]+[числа.5]),
    #"Removed Other Columns" = Table.SelectColumns(#"Added Custom",{"Пользовательская"})
in
    #"Removed Other Columns"
[/vba]

Автор - jakim
Дата добавления - 14.04.2022 в 16:17
прохожий2019 Дата: Четверг, 14.04.2022, 18:27 | Сообщение № 12
Группа: Проверенные
Ранг: Старожил
Сообщений: 1301
Репутация: 327 ±
Замечаний: 0% ±

365 Beta Channel
гм, чутка попроще:[vba]
Код
let
    f=(x)=>List.Sum(List.Transform(Text.Split(x," "),Number.From)),
    from = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    to = Table.TransformColumns(from,{"числа",f})
in
    to
[/vba]
ну и формулы теперь (с 2013 вроде) можно попроще:
Код
=СУММ(ФИЛЬТР.XML("< j>< i>"&ПОДСТАВИТЬ(A2;" ";"< /i>< i>")&"< /i>< /j>";"//i"))
К сообщению приложен файл: 2939270.xls (48.0 Kb)


Сообщение отредактировал прохожий2019 - Четверг, 14.04.2022, 18:45
 
Ответить
Сообщение гм, чутка попроще:[vba]
Код
let
    f=(x)=>List.Sum(List.Transform(Text.Split(x," "),Number.From)),
    from = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    to = Table.TransformColumns(from,{"числа",f})
in
    to
[/vba]
ну и формулы теперь (с 2013 вроде) можно попроще:
Код
=СУММ(ФИЛЬТР.XML("< j>< i>"&ПОДСТАВИТЬ(A2;" ";"< /i>< i>")&"< /i>< /j>";"//i"))

Автор - прохожий2019
Дата добавления - 14.04.2022 в 18:27
Egyptian Дата: Четверг, 14.04.2022, 19:58 | Сообщение № 13
Группа: Проверенные
Ранг: Ветеран
Сообщений: 527
Репутация: 193 ±
Замечаний: 0% ±

Excel 2013/2016
И вдогонку еще одна формула для офисов, начиная с 2007.
Код
=SUM(IFERROR(--MID(SUBSTITUTE(A1;" ";REPT(" ";99));1+99*(ROW($A$1:$A$7)-1);99);0))

Массивная.
 
Ответить
СообщениеИ вдогонку еще одна формула для офисов, начиная с 2007.
Код
=SUM(IFERROR(--MID(SUBSTITUTE(A1;" ";REPT(" ";99));1+99*(ROW($A$1:$A$7)-1);99);0))

Массивная.

Автор - Egyptian
Дата добавления - 14.04.2022 в 19:58
bmv98rus Дата: Четверг, 14.04.2022, 23:16 | Сообщение № 14
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4126
Репутация: 769 ±
Замечаний: 0% ±

Excel 2013/2016
Код
=SUMPRODUCT(--TEXT(MID(SUBSTITUTE(" "&A1;" ";REPT(" ";99));ROW($1:$9)*99;99);"0;0;0;\0"))


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
Сообщение
Код
=SUMPRODUCT(--TEXT(MID(SUBSTITUTE(" "&A1;" ";REPT(" ";99));ROW($1:$9)*99;99);"0;0;0;\0"))

Автор - bmv98rus
Дата добавления - 14.04.2022 в 23:16
прохожий2019 Дата: Пятница, 15.04.2022, 01:13 | Сообщение № 15
Группа: Проверенные
Ранг: Старожил
Сообщений: 1301
Репутация: 327 ±
Замечаний: 0% ±

365 Beta Channel
ну а в бета-канале так:
Код
=СУММ(--ТЕКСТРАЗД(A2;" "))
 
Ответить
Сообщениену а в бета-канале так:
Код
=СУММ(--ТЕКСТРАЗД(A2;" "))

Автор - прохожий2019
Дата добавления - 15.04.2022 в 01:13
bmv98rus Дата: Пятница, 15.04.2022, 07:52 | Сообщение № 16
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4126
Репутация: 769 ±
Замечаний: 0% ±

Excel 2013/2016
Цитата прохожий2019, 15.04.2022 в 01:13, в сообщении № 15 ()
ну а в бета-канале так:
ох и прикроют они и бету и ...


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
Сообщение
Цитата прохожий2019, 15.04.2022 в 01:13, в сообщении № 15 ()
ну а в бета-канале так:
ох и прикроют они и бету и ...

Автор - bmv98rus
Дата добавления - 15.04.2022 в 07:52
прохожий2019 Дата: Пятница, 15.04.2022, 22:26 | Сообщение № 17
Группа: Проверенные
Ранг: Старожил
Сообщений: 1301
Репутация: 327 ±
Замечаний: 0% ±

365 Beta Channel
ох и прикроют они и бету и ...
достоверно? или так?
 
Ответить
Сообщение
ох и прикроют они и бету и ...
достоверно? или так?

Автор - прохожий2019
Дата добавления - 15.04.2022 в 22:26
bmv98rus Дата: Суббота, 16.04.2022, 00:09 | Сообщение № 18
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4126
Репутация: 769 ±
Замечаний: 0% ±

Excel 2013/2016
Цитата прохожий2019, 15.04.2022 в 22:26, в сообщении № 17 ()
достоверно? или так?
тенденции.

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


Замечательный Временно просто медведь , процентов на 20.

Сообщение отредактировал bmv98rus - Суббота, 16.04.2022, 09:33
 
Ответить
Сообщение
Цитата прохожий2019, 15.04.2022 в 22:26, в сообщении № 17 ()
достоверно? или так?
тенденции.

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

Автор - bmv98rus
Дата добавления - 16.04.2022 в 00:09
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!