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

Вход

Регистрация

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

 

= Мир MS Excel/Сцепить через запятую все значения больше нуля - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Сцепить через запятую все значения больше нуля
romanermulin Дата: Вторник, 03.10.2023, 20:48 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 26
Репутация: 0 ±
Замечаний: 0% ±

16.66.1
Здравствуйте! Подскажите пожалуйста, как реализовать сцепление всех значений больше нуля и вывод их через запятую. Пример, как должно быть приложил.
Если все равны нулю, то должно быть пусто.
К сообщению приложен файл: 7671572.xlsx (9.1 Kb)


Роман
 
Ответить
СообщениеЗдравствуйте! Подскажите пожалуйста, как реализовать сцепление всех значений больше нуля и вывод их через запятую. Пример, как должно быть приложил.
Если все равны нулю, то должно быть пусто.

Автор - romanermulin
Дата добавления - 03.10.2023 в 20:48
DrMini Дата: Вторник, 03.10.2023, 21:01 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 1875
Репутация: 269 ±
Замечаний: 0% ±

Excel LTSC 2024 RUS
как реализовать сцепление всех значений больше нуля и вывод их через запятую

Код
=ОБЪЕДИНИТЬ(",";1;ЕСЛИ(A2:D2=0;"";A2:D2))

Если ячейки будут пустые, то можно проще Лист2:
Код
=ОБЪЕДИНИТЬ(",";1;A2:D2)
К сообщению приложен файл: 7404021.xlsx (11.1 Kb)


Сообщение отредактировал DrMini - Вторник, 03.10.2023, 21:03
 
Ответить
Сообщение
как реализовать сцепление всех значений больше нуля и вывод их через запятую

Код
=ОБЪЕДИНИТЬ(",";1;ЕСЛИ(A2:D2=0;"";A2:D2))

Если ячейки будут пустые, то можно проще Лист2:
Код
=ОБЪЕДИНИТЬ(",";1;A2:D2)

Автор - DrMini
Дата добавления - 03.10.2023 в 21:01
bigor Дата: Вторник, 03.10.2023, 21:04 | Сообщение № 3
Группа: Проверенные
Ранг: Старожил
Сообщений: 1270
Репутация: 244 ±
Замечаний: 0% ±

нет
Добрый вечер
Если Ваш офис поддерживает ОБЪЕДИНИТЬ() , то
Код
=ОБЪЕДИНИТЬ(",";1;ЕСЛИ(A2:D2<>0;A2:D2;""))
массивная
 
Ответить
СообщениеДобрый вечер
Если Ваш офис поддерживает ОБЪЕДИНИТЬ() , то
Код
=ОБЪЕДИНИТЬ(",";1;ЕСЛИ(A2:D2<>0;A2:D2;""))
массивная

Автор - bigor
Дата добавления - 03.10.2023 в 21:04
i691198 Дата: Вторник, 03.10.2023, 21:23 | Сообщение № 4
Группа: Проверенные
Ранг: Обитатель
Сообщений: 337
Репутация: 108 ±
Замечаний: 0% ±

Для старых версий более длинная формула.
Код
=ПОДСТАВИТЬ(ЕСЛИ(A2<>0;","&A2;"")&ЕСЛИ(B2<>0;","&B2;"")&ЕСЛИ(C2<>0;","&C2;"")&ЕСЛИ(D2<>0;","&D2;"");",";"";1)
 
Ответить
СообщениеДля старых версий более длинная формула.
Код
=ПОДСТАВИТЬ(ЕСЛИ(A2<>0;","&A2;"")&ЕСЛИ(B2<>0;","&B2;"")&ЕСЛИ(C2<>0;","&C2;"")&ЕСЛИ(D2<>0;","&D2;"");",";"";1)

Автор - i691198
Дата добавления - 03.10.2023 в 21:23
romanermulin Дата: Среда, 04.10.2023, 06:56 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 26
Репутация: 0 ±
Замечаний: 0% ±

16.66.1
Всем огромное спасибо! Проблема решена!!


Роман
 
Ответить
СообщениеВсем огромное спасибо! Проблема решена!!

Автор - romanermulin
Дата добавления - 04.10.2023 в 06:56
bmv98rus Дата: Среда, 04.10.2023, 09:46 | Сообщение № 6
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4115
Репутация: 769 ±
Замечаний: 0% ±

Excel 2013/2016
Для старых версий более долинная, но более короткая
Код
=REPLACE(SUBSTITUTE(","&A4 &"," &B4&"," &C4&"," &D4;",0";);1;1;)

естесвенно это если все ячейки заполнены, если нет, то
Код
=SUBSTITUTE(TRIM(REPLACE(SUBSTITUTE(" "&A6 &" " &B6&" " &C6&" " &D6;" 0";);1;1;));" ";",")

А еще вот так
Код
=REPLACE(TEXT(A2;"\,#;;;")&TEXT(B2;"\,#;;;")&TEXT(C2;"\,#;;;")&TEXT(D2;"\,#;;;");1;1;)

хотя если есть отрицательные, то
Код
=REPLACE(TEXT(A2;"\,#;\,-#;;")&TEXT(B2;"\,#;\,-#;;")&TEXT(C2;"\,#;\,-#;;")&TEXT(D2;"\,#;\,-#;;");1;1;)


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

Сообщение отредактировал bmv98rus - Среда, 04.10.2023, 11:45
 
Ответить
СообщениеДля старых версий более долинная, но более короткая
Код
=REPLACE(SUBSTITUTE(","&A4 &"," &B4&"," &C4&"," &D4;",0";);1;1;)

естесвенно это если все ячейки заполнены, если нет, то
Код
=SUBSTITUTE(TRIM(REPLACE(SUBSTITUTE(" "&A6 &" " &B6&" " &C6&" " &D6;" 0";);1;1;));" ";",")

А еще вот так
Код
=REPLACE(TEXT(A2;"\,#;;;")&TEXT(B2;"\,#;;;")&TEXT(C2;"\,#;;;")&TEXT(D2;"\,#;;;");1;1;)

хотя если есть отрицательные, то
Код
=REPLACE(TEXT(A2;"\,#;\,-#;;")&TEXT(B2;"\,#;\,-#;;")&TEXT(C2;"\,#;\,-#;;")&TEXT(D2;"\,#;\,-#;;");1;1;)

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

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