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

Вход

Регистрация

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

 

= Мир MS Excel/Сумма по отдельности написанных через дробь чисел. - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Сумма по отдельности написанных через дробь чисел.
mikolafnv Дата: Пятница, 15.01.2016, 11:09 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 7
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Уважаемые ГУРУ EXCEL!!! Интересует формула подсчета суммы чисел написанных через дробь, помогите если не затруднит. Спасибо!!! hands
К сообщению приложен файл: 9775291.xlsx (10.4 Kb)
 
Ответить
СообщениеУважаемые ГУРУ EXCEL!!! Интересует формула подсчета суммы чисел написанных через дробь, помогите если не затруднит. Спасибо!!! hands

Автор - mikolafnv
Дата добавления - 15.01.2016 в 11:09
_Boroda_ Дата: Пятница, 15.01.2016, 11:19 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 16718
Репутация: 6505 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
Так нужно?
Код
=СУММПРОИЗВ(--ЛЕВБ(0&A3:E3;ПОИСК("/";A3:E3)))&"/"&СУММПРОИЗВ(--ПСТР(A3:E3&0;ПОИСК("/";A3:E3)+1;9))/10

или формула массива (вводится одновременным нажатием Контрл Шифт Ентер)
Код
=СУММ(--ЛЕВБ(0&A3:E3;ПОИСК("/";A3:E3)))&"/"&СУММ(--ПСТР(A3:E3&0;ПОИСК("/";A3:E3)+1;9))/10


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеТак нужно?
Код
=СУММПРОИЗВ(--ЛЕВБ(0&A3:E3;ПОИСК("/";A3:E3)))&"/"&СУММПРОИЗВ(--ПСТР(A3:E3&0;ПОИСК("/";A3:E3)+1;9))/10

или формула массива (вводится одновременным нажатием Контрл Шифт Ентер)
Код
=СУММ(--ЛЕВБ(0&A3:E3;ПОИСК("/";A3:E3)))&"/"&СУММ(--ПСТР(A3:E3&0;ПОИСК("/";A3:E3)+1;9))/10

Автор - _Boroda_
Дата добавления - 15.01.2016 в 11:19
pabchek Дата: Пятница, 15.01.2016, 11:19 | Сообщение № 3
Группа: Проверенные
Ранг: Ветеран
Сообщений: 931
Репутация: 218 ±
Замечаний: 0% ±

Excel 2007
У меня вот так получилось. Формула массива (кнтрл+шифт+ентер одновременно)
Код
=СУММ(ЕСЛИОШИБКА(--ПСТР(A3:E3;1;ПОИСК("/";A3:E3)-1);0))&"/"&СУММ(ЕСЛИОШИБКА(--ПСТР(A3:E3;ПОИСК("/";A3:E3)+1;9);0))
К сообщению приложен файл: 6112271.xlsx (8.9 Kb)


"Учиться, учиться и еще раз учиться!"
WM: R399923528092
 
Ответить
СообщениеУ меня вот так получилось. Формула массива (кнтрл+шифт+ентер одновременно)
Код
=СУММ(ЕСЛИОШИБКА(--ПСТР(A3:E3;1;ПОИСК("/";A3:E3)-1);0))&"/"&СУММ(ЕСЛИОШИБКА(--ПСТР(A3:E3;ПОИСК("/";A3:E3)+1;9);0))

Автор - pabchek
Дата добавления - 15.01.2016 в 11:19
Nic70y Дата: Пятница, 15.01.2016, 11:30 | Сообщение № 4
Группа: Друзья
Ранг: Экселист
Сообщений: 9006
Репутация: 2369 ±
Замечаний: 0% ±

Excel 2010
для разнообразия
Код
=СУММПРОИЗВ(ЦЕЛОЕ(ПОДСТАВИТЬ(A3:E3;"/";",")))&"/"&СУММПРОИЗВ(--ПРАВБ(ПОДСТАВИТЬ(A3:E3;"/";"000000000000000");15))


ЮMoney 41001841029809
 
Ответить
Сообщениедля разнообразия
Код
=СУММПРОИЗВ(ЦЕЛОЕ(ПОДСТАВИТЬ(A3:E3;"/";",")))&"/"&СУММПРОИЗВ(--ПРАВБ(ПОДСТАВИТЬ(A3:E3;"/";"000000000000000");15))

Автор - Nic70y
Дата добавления - 15.01.2016 в 11:30
mikolafnv Дата: Пятница, 15.01.2016, 11:47 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 7
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Можно еще по такому примеру, требования те же самые. Спасибо!
К сообщению приложен файл: 15.01.16.xlsx (14.7 Kb)


Сообщение отредактировал mikolafnv - Пятница, 15.01.2016, 12:16
 
Ответить
СообщениеМожно еще по такому примеру, требования те же самые. Спасибо!

Автор - mikolafnv
Дата добавления - 15.01.2016 в 11:47
sv2014 Дата: Пятница, 15.01.2016, 15:06 | Сообщение № 6
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 226
Репутация: 61 ±
Замечаний: 0% ±

Excel 2013
mikolafnv, добрый день вариант формулами aaa1 aaa2 vvv,в ячейках красного цвета.

[vba]
Код
Function vvv(r1 As Range, r2 As Range)
  Dim x1, x2, y1, y2
   x1 = Val(Split(r1, "/")(0))
   y1 = Val(Split(r1, "/")(1))
   x2 = Val(Split(r2, "/")(0))
   y2 = Val(Split(r2, "/")(1))
   vvv = x1 + x2 & "/" & y1 + y2
End Function
[/vba]

[vba]
Код
Function aaa1$(rng As Range)
    Dim x, y, r As Range
For Each r In rng
If r.Offset(-1, 0).Value = "Д" Then
   x = x + Val(Split(r, "/")(0))
   y = y + Val(Split(r, "/")(1))
End If
Next
    aaa1 = x & "/" & y
End Function
[/vba]

[vba]
Код
Function aaa2$(rng As Range)
    Dim x, y, r As Range
For Each r In rng
If r.Offset(-1, 0).Value = "Н" Then
   x = x + Val(Split(r, "/")(0))
   y = y + Val(Split(r, "/")(1))
End If
Next
    aaa2 = x & "/" & y
End Function
[/vba]
К сообщению приложен файл: example_16_01_2.xls (48.5 Kb)


Сообщение отредактировал sv2014 - Пятница, 15.01.2016, 15:23
 
Ответить
Сообщениеmikolafnv, добрый день вариант формулами aaa1 aaa2 vvv,в ячейках красного цвета.

[vba]
Код
Function vvv(r1 As Range, r2 As Range)
  Dim x1, x2, y1, y2
   x1 = Val(Split(r1, "/")(0))
   y1 = Val(Split(r1, "/")(1))
   x2 = Val(Split(r2, "/")(0))
   y2 = Val(Split(r2, "/")(1))
   vvv = x1 + x2 & "/" & y1 + y2
End Function
[/vba]

[vba]
Код
Function aaa1$(rng As Range)
    Dim x, y, r As Range
For Each r In rng
If r.Offset(-1, 0).Value = "Д" Then
   x = x + Val(Split(r, "/")(0))
   y = y + Val(Split(r, "/")(1))
End If
Next
    aaa1 = x & "/" & y
End Function
[/vba]

[vba]
Код
Function aaa2$(rng As Range)
    Dim x, y, r As Range
For Each r In rng
If r.Offset(-1, 0).Value = "Н" Then
   x = x + Val(Split(r, "/")(0))
   y = y + Val(Split(r, "/")(1))
End If
Next
    aaa2 = x & "/" & y
End Function
[/vba]

Автор - sv2014
Дата добавления - 15.01.2016 в 15:06
_Boroda_ Дата: Пятница, 15.01.2016, 16:09 | Сообщение № 7
Группа: Админы
Ранг: Местный житель
Сообщений: 16718
Репутация: 6505 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
Формулами
К сообщению приложен файл: 15.01.16_1.xlsx (15.4 Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеФормулами

Автор - _Boroda_
Дата добавления - 15.01.2016 в 16:09
gge29 Дата: Пятница, 19.01.2018, 22:49 | Сообщение № 8
Группа: Проверенные
Ранг: Обитатель
Сообщений: 302
Репутация: 3 ±
Замечаний: 0% ±

Всем доброго вечера!!!Помогите пожалуйста разобраться с формулой,в файле всё описал
К сообщению приложен файл: 3581306.xlsx (10.5 Kb)
 
Ответить
СообщениеВсем доброго вечера!!!Помогите пожалуйста разобраться с формулой,в файле всё описал

Автор - gge29
Дата добавления - 19.01.2018 в 22:49
Che79 Дата: Пятница, 19.01.2018, 23:35 | Сообщение № 9
Группа: Друзья
Ранг: Старожил
Сообщений: 1649
Репутация: 306 ±
Замечаний: 0% ±

2013 Win, 365 Mac
gge29, Правила форума в т.ч. гласят
Цитата
на форуме запрещено п. 5q - задавать новые вопросы в уже созданных чужих или своих темах
Создайте новую тему со своим вопросом. А если хорошо присмотреться, то ответ на вопрос можно найти в Вашем же файле - примере


Делай нормально и будет нормально!
 
Ответить
Сообщениеgge29, Правила форума в т.ч. гласят
Цитата
на форуме запрещено п. 5q - задавать новые вопросы в уже созданных чужих или своих темах
Создайте новую тему со своим вопросом. А если хорошо присмотреться, то ответ на вопрос можно найти в Вашем же файле - примере

Автор - Che79
Дата добавления - 19.01.2018 в 23:35
muratzh81 Дата: Четверг, 20.10.2022, 14:47 | Сообщение № 10
Группа: Пользователи
Ранг: Новичок
Сообщений: 15
Репутация: 0 ±
Замечаний: 60% ±

2108 сборка 14332.20303
Добрый день ! Подскажите пожалуйста как посчитать сумму до дробей и после дробей в общую с учетом пустых ячеек
К сообщению приложен файл: 4868489.xlsx (9.0 Kb)


Сообщение отредактировал muratzh81 - Четверг, 20.10.2022, 17:19
 
Ответить
СообщениеДобрый день ! Подскажите пожалуйста как посчитать сумму до дробей и после дробей в общую с учетом пустых ячеек

Автор - muratzh81
Дата добавления - 20.10.2022 в 14:47
msi2102 Дата: Четверг, 20.10.2022, 15:25 | Сообщение № 11
Группа: Проверенные
Ранг: Обитатель
Сообщений: 415
Репутация: 129 ±
Замечаний: 0% ±

Excel 2007
К сообщению приложен файл: 4975355.xlsx (10.1 Kb)


Сообщение отредактировал Serge_007 - Четверг, 20.10.2022, 16:54
 
Ответить
СообщениеДоступно только для пользователей

Автор - msi2102
Дата добавления - 20.10.2022 в 15:25
muratzh81 Дата: Четверг, 20.10.2022, 15:28 | Сообщение № 12
Группа: Пользователи
Ранг: Новичок
Сообщений: 15
Репутация: 0 ±
Замечаний: 60% ±

2108 сборка 14332.20303
msi2102, Спасибо большое!!!
 
Ответить
Сообщениеmsi2102, Спасибо большое!!!

Автор - muratzh81
Дата добавления - 20.10.2022 в 15:28
muratzh81 Дата: Пятница, 21.10.2022, 12:53 | Сообщение № 13
Группа: Пользователи
Ранг: Новичок
Сообщений: 15
Репутация: 0 ±
Замечаний: 60% ±

2108 сборка 14332.20303
Подскажите пожалуйста, ваша формула работает на моем компьютере, но стоит мне перенести файл на другой компьютер, формула перестает считать.
[Оставьте еще 9997 сообщение(й), чтобы увидеть скрытый текст]
К сообщению приложен файл: 4975355.xlsx(10.1 Kb)
 
Ответить
СообщениеПодскажите пожалуйста, ваша формула работает на моем компьютере, но стоит мне перенести файл на другой компьютер, формула перестает считать.
[Оставьте еще 9997 сообщение(й), чтобы увидеть скрытый текст]
К сообщению приложен файл: 4975355.xlsx(10.1 Kb)

Автор - muratzh81
Дата добавления - 21.10.2022 в 12:53
Serge_007 Дата: Пятница, 21.10.2022, 13:11 | Сообщение № 14
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Дело не в компьютере,а в версии Excel

Функция ФИЛЬТР.XML() недоступна в Web-Excel и Excel для Mac.
Функция работает в следующих релизах: Excel для Microsoft 365, Excel 2021, Excel 2019, Excel 2016 и Excel 2013


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
СообщениеДело не в компьютере,а в версии Excel

Функция ФИЛЬТР.XML() недоступна в Web-Excel и Excel для Mac.
Функция работает в следующих релизах: Excel для Microsoft 365, Excel 2021, Excel 2019, Excel 2016 и Excel 2013

Автор - Serge_007
Дата добавления - 21.10.2022 в 13:11
  • Страница 1 из 1
  • 1
Поиск:

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