Суммирование ячеек с дробями
Muhan
Дата: Понедельник, 30.01.2023, 18:12 |
Сообщение № 1
Группа: Проверенные
Ранг: Участник
Сообщений: 65
Уважаемые знатоки у меня не получается просуммировать ячейки с дробями! Результат суммирования не тот который мне нужен. Кто ни будь сможет помочь?
Уважаемые знатоки у меня не получается просуммировать ячейки с дробями! Результат суммирования не тот который мне нужен. Кто ни будь сможет помочь? Muhan
К сообщению приложен файл:
__.xls
(35.5 Kb)
Ответить
Сообщение Уважаемые знатоки у меня не получается просуммировать ячейки с дробями! Результат суммирования не тот который мне нужен. Кто ни будь сможет помочь? Автор - Muhan Дата добавления - 30.01.2023 в 18:12
Egyptian
Дата: Понедельник, 30.01.2023, 18:31 |
Сообщение № 2
Группа: Проверенные
Ранг: Ветеран
Сообщений: 526
Репутация:
193
±
Замечаний:
0% ±
Excel 2013/2016
Как-то так:Код
=SUM(IFERROR(--SUBSTITUTE(SUBSTITUTE(LEFTB(C2:C16;SEARCH("/";C2:C16)-1);".";MID(1/2;2;1));",";MID(1/2;2;1));))&"/"&SUM(IFERROR(--SUBSTITUTE(SUBSTITUTE(RIGHTB(C2:C16;LEN(C2:C16)-SEARCH("/";C2:C16));".";MID(1/2;2;1));",";MID(1/2;2;1));))
Формула массива.
Как-то так:Код
=SUM(IFERROR(--SUBSTITUTE(SUBSTITUTE(LEFTB(C2:C16;SEARCH("/";C2:C16)-1);".";MID(1/2;2;1));",";MID(1/2;2;1));))&"/"&SUM(IFERROR(--SUBSTITUTE(SUBSTITUTE(RIGHTB(C2:C16;LEN(C2:C16)-SEARCH("/";C2:C16));".";MID(1/2;2;1));",";MID(1/2;2;1));))
Формула массива. Egyptian
Сообщение отредактировал Egyptian - Понедельник, 30.01.2023, 18:31
Ответить
Сообщение Как-то так:Код
=SUM(IFERROR(--SUBSTITUTE(SUBSTITUTE(LEFTB(C2:C16;SEARCH("/";C2:C16)-1);".";MID(1/2;2;1));",";MID(1/2;2;1));))&"/"&SUM(IFERROR(--SUBSTITUTE(SUBSTITUTE(RIGHTB(C2:C16;LEN(C2:C16)-SEARCH("/";C2:C16));".";MID(1/2;2;1));",";MID(1/2;2;1));))
Формула массива. Автор - Egyptian Дата добавления - 30.01.2023 в 18:31
прохожий2019
Дата: Понедельник, 30.01.2023, 19:45 |
Сообщение № 3
Группа: Проверенные
Ранг: Старожил
Сообщений: 1298
Репутация:
327
±
Замечаний:
0% ±
365 Beta Channel
Код
=СУММ(--ЛЕВБ(C2:C16;ПОИСК("/";C2:C16)-1))&"/"&СУММ(--ПСТР(C2:C16;ПОИСК("/";C2:C16)+1;9))
или такое:Код
=ОБЪЕДИНИТЬ("/";;REDUCE({0;0};C2:C16;LAMBDA(s;c;s+ТЕКСТРАЗД(c;"/"))))
только не пойму - в оригинале дроби текстом или форматом? если форматом, то:Код
=ОБЪЕДИНИТЬ("/";;REDUCE({0;0};ТЕКСТ(C2:C16;"?/???");LAMBDA(s;c;s+ТЕКСТРАЗД(c;"/"))))
Код
=СУММ(--ЛЕВБ(C2:C16;ПОИСК("/";C2:C16)-1))&"/"&СУММ(--ПСТР(C2:C16;ПОИСК("/";C2:C16)+1;9))
или такое:Код
=ОБЪЕДИНИТЬ("/";;REDUCE({0;0};C2:C16;LAMBDA(s;c;s+ТЕКСТРАЗД(c;"/"))))
только не пойму - в оригинале дроби текстом или форматом? если форматом, то:Код
=ОБЪЕДИНИТЬ("/";;REDUCE({0;0};ТЕКСТ(C2:C16;"?/???");LAMBDA(s;c;s+ТЕКСТРАЗД(c;"/"))))
прохожий2019
Сообщение отредактировал прохожий2019 - Понедельник, 30.01.2023, 20:28
Ответить
Сообщение Код
=СУММ(--ЛЕВБ(C2:C16;ПОИСК("/";C2:C16)-1))&"/"&СУММ(--ПСТР(C2:C16;ПОИСК("/";C2:C16)+1;9))
или такое:Код
=ОБЪЕДИНИТЬ("/";;REDUCE({0;0};C2:C16;LAMBDA(s;c;s+ТЕКСТРАЗД(c;"/"))))
только не пойму - в оригинале дроби текстом или форматом? если форматом, то:Код
=ОБЪЕДИНИТЬ("/";;REDUCE({0;0};ТЕКСТ(C2:C16;"?/???");LAMBDA(s;c;s+ТЕКСТРАЗД(c;"/"))))
Автор - прохожий2019 Дата добавления - 30.01.2023 в 19:45
Muhan
Дата: Вторник, 31.01.2023, 07:42 |
Сообщение № 4
Группа: Проверенные
Ранг: Участник
Сообщений: 65
Egyptian , спасибо Вам большое! Вы мне очень помогли!
Egyptian , спасибо Вам большое! Вы мне очень помогли!Muhan
Сообщение отредактировал Serge_007 - Вторник, 31.01.2023, 09:14
Ответить
Сообщение Egyptian , спасибо Вам большое! Вы мне очень помогли!Автор - Muhan Дата добавления - 31.01.2023 в 07:42
Muhan
Дата: Вторник, 31.01.2023, 07:44 |
Сообщение № 5
Группа: Проверенные
Ранг: Участник
Сообщений: 65
К сообщению приложен файл: 3556677.xls(37.0 Kb)
Ваш вариант еще лучше! Спасибо Вам большое!
К сообщению приложен файл: 3556677.xls(37.0 Kb)
Ваш вариант еще лучше! Спасибо Вам большое!Muhan
Ответить
Сообщение К сообщению приложен файл: 3556677.xls(37.0 Kb)
Ваш вариант еще лучше! Спасибо Вам большое!Автор - Muhan Дата добавления - 31.01.2023 в 07:44
Egyptian
Дата: Вторник, 31.01.2023, 08:54 |
Сообщение № 6
Группа: Проверенные
Ранг: Ветеран
Сообщений: 526
Репутация:
193
±
Замечаний:
0% ±
Excel 2013/2016
Естественная реакция на формулу покороче))
Естественная реакция на формулу покороче))Egyptian
Ответить
Сообщение Естественная реакция на формулу покороче))Автор - Egyptian Дата добавления - 31.01.2023 в 08:54
прохожий2019
Дата: Вторник, 31.01.2023, 09:12 |
Сообщение № 7
Группа: Проверенные
Ранг: Старожил
Сообщений: 1298
Репутация:
327
±
Замечаний:
0% ±
365 Beta Channel
ну в данном случае она же и шустрее
Сообщение отредактировал прохожий2019 - Вторник, 31.01.2023, 09:13
Ответить
Сообщение ну в данном случае она же и шустрее Автор - прохожий2019 Дата добавления - 31.01.2023 в 09:12
Egyptian
Дата: Вторник, 31.01.2023, 09:29 |
Сообщение № 8
Группа: Проверенные
Ранг: Ветеран
Сообщений: 526
Репутация:
193
±
Замечаний:
0% ±
Excel 2013/2016
Конечно будет шустрее, это и без тестов понятно. Но я пытался сделать универсальный вариант, с игнорированием ошибок при отсутствии записи, также с предусмотром десятичных (если будут) в виде точки для US настроек, пусть и в виде текста (мне пару раз встречалось в практике).
Конечно будет шустрее, это и без тестов понятно. Но я пытался сделать универсальный вариант, с игнорированием ошибок при отсутствии записи, также с предусмотром десятичных (если будут) в виде точки для US настроек, пусть и в виде текста (мне пару раз встречалось в практике).Egyptian
Ответить
Сообщение Конечно будет шустрее, это и без тестов понятно. Но я пытался сделать универсальный вариант, с игнорированием ошибок при отсутствии записи, также с предусмотром десятичных (если будут) в виде точки для US настроек, пусть и в виде текста (мне пару раз встречалось в практике).Автор - Egyptian Дата добавления - 31.01.2023 в 09:29
Nic70y
Дата: Вторник, 31.01.2023, 12:27 |
Сообщение № 9
Группа: Друзья
Ранг: Экселист
Сообщений: 9006
Репутация:
2369
±
Замечаний:
0% ±
Excel 2010
[vba]Код
Function u_99(a As Range) f = 0 g = 0 For Each c In a d = c.Text e = InStr(d, "/") If e > 0 Then f = f + Left(d, e - 1) g = g + Right(d, Len(d) - e) End If Next u_99 = f & "/" & g End Function
[/vba]
[vba]Код
Function u_99(a As Range) f = 0 g = 0 For Each c In a d = c.Text e = InStr(d, "/") If e > 0 Then f = f + Left(d, e - 1) g = g + Right(d, Len(d) - e) End If Next u_99 = f & "/" & g End Function
[/vba] Nic70y
К сообщению приложен файл:
16.xls
(40.5 Kb)
ЮMoney 41001841029809
Сообщение отредактировал Nic70y - Вторник, 31.01.2023, 12:29
Ответить
Сообщение [vba]Код
Function u_99(a As Range) f = 0 g = 0 For Each c In a d = c.Text e = InStr(d, "/") If e > 0 Then f = f + Left(d, e - 1) g = g + Right(d, Len(d) - e) End If Next u_99 = f & "/" & g End Function
[/vba] Автор - Nic70y Дата добавления - 31.01.2023 в 12:27
Muhan
Дата: Вторник, 31.01.2023, 15:26 |
Сообщение № 10
Группа: Проверенные
Ранг: Участник
Сообщений: 65
Привет ребят! у меня не получилось "присандалить" вашу формулу к своему файлу?! Помогите еще раз пжл Свой файл прикрепляю
Привет ребят! у меня не получилось "присандалить" вашу формулу к своему файлу?! Помогите еще раз пжл Свой файл прикрепляю Muhan
К сообщению приложен файл:
___.xls
(47.5 Kb)
Ответить
Сообщение Привет ребят! у меня не получилось "присандалить" вашу формулу к своему файлу?! Помогите еще раз пжл Свой файл прикрепляю Автор - Muhan Дата добавления - 31.01.2023 в 15:26
Nic70y
Дата: Вторник, 31.01.2023, 15:33 |
Сообщение № 11
Группа: Друзья
Ранг: Экселист
Сообщений: 9006
Репутация:
2369
±
Замечаний:
0% ±
Excel 2010
Muhan , почему 4/143? у меня получилось 13/151
Muhan , почему 4/143? у меня получилось 13/151Nic70y
К сообщению приложен файл:
715.xls
(58.0 Kb)
ЮMoney 41001841029809
Ответить
Сообщение Muhan , почему 4/143? у меня получилось 13/151Автор - Nic70y Дата добавления - 31.01.2023 в 15:33
Serge_007
Дата: Вторник, 31.01.2023, 15:38 |
Сообщение № 12
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация:
2749
±
Замечаний:
±
Excel 2016
Muhan , у Вас нет дробей в ячейках, это просто формат такой
Muhan , у Вас нет дробей в ячейках, это просто формат такойSerge_007
ЮMoney :41001419691823 | WMR :126292472390
Ответить
Сообщение Muhan , у Вас нет дробей в ячейках, это просто формат такойАвтор - Serge_007 Дата добавления - 31.01.2023 в 15:38
Muhan
Дата: Вторник, 31.01.2023, 16:11 |
Сообщение № 13
Группа: Проверенные
Ранг: Участник
Сообщений: 65
почему 4/143? у меня получилось 13/151 К сообщению приложен файл: 715.xls(58.0 Kb)
Благодарю Вас! У вас правильно. Я не правильно посчитал. Формула ваша получилась идеальная! Спасибо!
почему 4/143? у меня получилось 13/151 К сообщению приложен файл: 715.xls(58.0 Kb)
Благодарю Вас! У вас правильно. Я не правильно посчитал. Формула ваша получилась идеальная! Спасибо!Muhan
Ответить
Сообщение почему 4/143? у меня получилось 13/151 К сообщению приложен файл: 715.xls(58.0 Kb)
Благодарю Вас! У вас правильно. Я не правильно посчитал. Формула ваша получилась идеальная! Спасибо!Автор - Muhan Дата добавления - 31.01.2023 в 16:11
Muhan
Дата: Вторник, 31.01.2023, 16:13 |
Сообщение № 14
Группа: Проверенные
Ранг: Участник
Сообщений: 65
у Вас нет дробей в ячейках, это просто формат такой
Спасибо Вам за разъяснение!
у Вас нет дробей в ячейках, это просто формат такой
Спасибо Вам за разъяснение!Muhan
Ответить
Сообщение у Вас нет дробей в ячейках, это просто формат такой
Спасибо Вам за разъяснение!Автор - Muhan Дата добавления - 31.01.2023 в 16:13
Nic70y
Дата: Вторник, 31.01.2023, 16:14 |
Сообщение № 15
Группа: Друзья
Ранг: Экселист
Сообщений: 9006
Репутация:
2369
±
Замечаний:
0% ±
Excel 2010
ну это не совсем формула, формулой такое посчитать сложно , это UDF (типа макрос) апдэйт ну погорячился, формулаКод
=СУММПРОИЗВ(--ЛЕВБ(ТЕКСТ(J7:J82;"#"" ""???/???")&"/0";ПОИСК("/";ТЕКСТ(J7:J82;"#"" ""???/???")&"/0")-1))&"/"&СУММПРОИЗВ(--ПСТР(ТЕКСТ(J7:J82;"#"" ""???/???")&"/0";ПОИСК("/";ТЕКСТ(J7:J82;"#"" ""???/???")&"/0")+1;3))
ну это не совсем формула, формулой такое посчитать сложно , это UDF (типа макрос) апдэйт ну погорячился, формулаКод
=СУММПРОИЗВ(--ЛЕВБ(ТЕКСТ(J7:J82;"#"" ""???/???")&"/0";ПОИСК("/";ТЕКСТ(J7:J82;"#"" ""???/???")&"/0")-1))&"/"&СУММПРОИЗВ(--ПСТР(ТЕКСТ(J7:J82;"#"" ""???/???")&"/0";ПОИСК("/";ТЕКСТ(J7:J82;"#"" ""???/???")&"/0")+1;3))
Nic70y
ЮMoney 41001841029809
Сообщение отредактировал Nic70y - Вторник, 31.01.2023, 17:02
Ответить
Сообщение ну это не совсем формула, формулой такое посчитать сложно , это UDF (типа макрос) апдэйт ну погорячился, формулаКод
=СУММПРОИЗВ(--ЛЕВБ(ТЕКСТ(J7:J82;"#"" ""???/???")&"/0";ПОИСК("/";ТЕКСТ(J7:J82;"#"" ""???/???")&"/0")-1))&"/"&СУММПРОИЗВ(--ПСТР(ТЕКСТ(J7:J82;"#"" ""???/???")&"/0";ПОИСК("/";ТЕКСТ(J7:J82;"#"" ""???/???")&"/0")+1;3))
Автор - Nic70y Дата добавления - 31.01.2023 в 16:14