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

 

= Мир MS Excel/Подстановка нескольких значений через точку с запятой к данн - Мир MS Excel

  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Подстановка нескольких значений через точку с запятой к данн
tarasova@altkadastrru Дата: Четверг, 11.05.2023, 09:54 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Здравствуйте, помогите.Есть два столбца, в столбце кадастровый номер ЗУ есть повторяющиеся значения, как через формулу подставить значения из столбца - Кадастровый номер ОКС через ";" к кадастровому номеру ЗУ. Должно получиться как в таблице 2
К сообщению приложен файл: kadastrovye_nomera_on.xlsx (12.3 Kb)


Сообщение отредактировал tarasova@altkadastrru - Четверг, 11.05.2023, 10:54
 
Ответить
СообщениеЗдравствуйте, помогите.Есть два столбца, в столбце кадастровый номер ЗУ есть повторяющиеся значения, как через формулу подставить значения из столбца - Кадастровый номер ОКС через ";" к кадастровому номеру ЗУ. Должно получиться как в таблице 2

Автор - tarasova@altkadastrru
Дата добавления - 11.05.2023 в 09:54
elovkov Дата: Четверг, 11.05.2023, 10:15 | Сообщение № 2
Группа: Друзья
Ранг: Ветеран
Сообщений: 501
Репутация: 83 ±
Замечаний: 0% ±

Excel 2013
=ЕСЛИ(B2<>0;A2&"; "&B2;A2)


Умное лицо это еще не признак ума. Все глупости на земле делаются именно с этим выражением лица

Сообщение отредактировал elovkov - Четверг, 11.05.2023, 10:17
 
Ответить
Сообщение
=ЕСЛИ(B2<>0;A2&"; "&B2;A2)

Автор - elovkov
Дата добавления - 11.05.2023 в 10:15
DrMini Дата: Четверг, 11.05.2023, 10:19 | Сообщение № 3
Группа: Модераторы
Ранг: Старожил
Сообщений: 2052
Репутация: 319 ±
Замечаний: 0% ±

Excel LTSC 2024 RUS
Или так:
=СЦЕПИТЬ(A2;";";B2)

ну и тогда на "все случаи жизни":
=ЕСЛИ(B2="";A2;ЕСЛИ(A2="";B2;СЦЕПИТЬ(A2;";";B2)))

:D


Сообщение отредактировал DrMini - Четверг, 11.05.2023, 10:32
 
Ответить
СообщениеИли так:
=СЦЕПИТЬ(A2;";";B2)

ну и тогда на "все случаи жизни":
=ЕСЛИ(B2="";A2;ЕСЛИ(A2="";B2;СЦЕПИТЬ(A2;";";B2)))

:D

Автор - DrMini
Дата добавления - 11.05.2023 в 10:19
jakim Дата: Четверг, 11.05.2023, 10:19 | Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 1218
Репутация: 316 ±
Замечаний: 0% ±

Excel 2010
Формула

=ЕСЛИ(B2="";A2;A2&";"&B2)
 
Ответить
Сообщение
Формула

=ЕСЛИ(B2="";A2;A2&";"&B2)

Автор - jakim
Дата добавления - 11.05.2023 в 10:19
tarasova@altkadastrru Дата: Четверг, 11.05.2023, 10:30 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Немного не так выразилась, я имела ввиду так как в таблице 2


Сообщение отредактировал tarasova@altkadastrru - Четверг, 11.05.2023, 10:38
 
Ответить
СообщениеНемного не так выразилась, я имела ввиду так как в таблице 2

Автор - tarasova@altkadastrru
Дата добавления - 11.05.2023 в 10:30
elovkov Дата: Четверг, 11.05.2023, 10:40 | Сообщение № 6
Группа: Друзья
Ранг: Ветеран
Сообщений: 501
Репутация: 83 ±
Замечаний: 0% ±

Excel 2013
Что-то я в примере не вижу таблицу 2)
Напишите как результат должен выглядеть

а, файл заменили)


Умное лицо это еще не признак ума. Все глупости на земле делаются именно с этим выражением лица

Сообщение отредактировал elovkov - Четверг, 11.05.2023, 10:54
 
Ответить
СообщениеЧто-то я в примере не вижу таблицу 2)
Напишите как результат должен выглядеть

а, файл заменили)

Автор - elovkov
Дата добавления - 11.05.2023 в 10:40
jakim Дата: Четверг, 11.05.2023, 10:46 | Сообщение № 7
Группа: Друзья
Ранг: Старожил
Сообщений: 1218
Репутация: 316 ±
Замечаний: 0% ±

Excel 2010
Power Query

l

et
    Source = Excel.CurrentWorkbook(){[Name="Table2"]}[Content],
    #"Grouped Rows" = Table.Group(Source, {"Кадастровый номер ЗУ"}, {{"Count", each _, type table [Кадастровый номер ЗУ=text, Кадастровый номер ОКС=text]}}),
    #"Added Custom" = Table.AddColumn(#"Grouped Rows", "Custom", each [Count][Кадастровый номер ОКС]),
    #"Extracted Values" = Table.TransformColumns(#"Added Custom", {"Custom", each Text.Combine(List.Transform(_, Text.From), "; "), type text}),
    #"Removed Columns" = Table.RemoveColumns(#"Extracted Values",{"Count"}),
    #"Renamed Columns" = Table.RenameColumns(#"Removed Columns",{{"Custom", "Кадастровый номер ОКС"}})
in
    #"Renamed Columns"

К сообщению приложен файл: 4575996.xlsx (21.1 Kb)
 
Ответить
Сообщение
Power Query

l[vba]
et    Source = Excel.CurrentWorkbook(){[Name="Тable2"]}[Content];    Source"Grouped Rows" = Тable.Group(each; {"Кадастровый номер ЗУ"}; {{"Count"; _ type; table Кадастровый [номер ЗУ text=Кадастровый; номер ОКС text=each]}});    Count"Added Custom" = Тable.AddColumn(Кадастровый"Grouped Rows"; "Custom"; номер [ОКС][each _ Text.From]);    type"Extracted Values" = Тable.TransformColumns(text"Added Custom"; {"Custom"; in Тext.Combine(List.Transform(undefined; undefined); "; "); undefined undefined});    undefined"Removed Columns" = Тable.RemoveColumns(undefined"Extracted Values";{"Count"});    undefined"Renamed Columns" = Тable.RenameColumns(undefined"Removed Columns";{{"Custom"; "Кадастровый номер ОКС"}})undefined    undefined"Renamed Columns"
[/vba]

Автор - jakim
Дата добавления - 11.05.2023 в 10:46
DrMini Дата: Четверг, 11.05.2023, 11:37 | Сообщение № 8
Группа: Модераторы
Ранг: Старожил
Сообщений: 2052
Репутация: 319 ±
Замечаний: 0% ±

Excel LTSC 2024 RUS
Цитата tarasova@altkadastrru, 11.05.2023 в 10:30, в сообщении № 5 ( писал(а)):
как в таблице 2

Вариант формулами.
Второй вариант содержит массивную формулу.
К сообщению приложен файл: 1859784.xlsx (14.5 Kb)


Сообщение отредактировал DrMini - Четверг, 11.05.2023, 11:38
 
Ответить
Сообщение
Цитата tarasova@altkadastrru, 11.05.2023 в 10:30, в сообщении № 5 ( писал(а)):
как в таблице 2

Вариант формулами.
Второй вариант содержит массивную формулу.

Автор - DrMini
Дата добавления - 11.05.2023 в 11:37
tarasova@altkadastrru Дата: Четверг, 11.05.2023, 11:40 | Сообщение № 9
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
DrMini, спасибо :)


Ученик
 
Ответить
СообщениеDrMini, спасибо :)

Автор - tarasova@altkadastrru
Дата добавления - 11.05.2023 в 11:40
прохожий2019 Дата: Четверг, 11.05.2023, 15:06 | Сообщение № 10
Группа: Проверенные
Ранг: Старожил
Сообщений: 1398
Репутация: 364 ±
Замечаний: 0% ±

365 Beta Channel
Цитата jakim, 11.05.2023 в 10:46, в сообщении № 7 ( писал(а)):
Power Query

let
    from = Excel.CurrentWorkbook(){[Name="Table2"]}[Content],
    to = Table.Group(from, "Кадастровый номер ЗУ", {"Кадастровый номер ОКС", (t)=>Text.Combine(t[Кадастровый номер ОКС],"; ")})
in
    to



до кучи 365:

=LET(x;УНИК(Table2[Кадастровый номер ЗУ]);y;MAP(x;LAMBDA(z;ОБЪЕДИНИТЬ("; ";;ФИЛЬТР(Table2[Кадастровый номер ОКС];Table2[Кадастровый номер ЗУ]=z))));ГСТОЛБИК(x;y))

К сообщению приложен файл: 5311244.xlsx (25.1 Kb)


Сообщение отредактировал прохожий2019 - Четверг, 11.05.2023, 20:15
 
Ответить
Сообщение
Цитата jakim, 11.05.2023 в 10:46, в сообщении № 7 ( писал(а)):
Power Query

[vba]
let    from = Excel.CurrentWorkbook(){[Name="Тable2"]}[Content];    to = Тable.Group(from; "Кадастровый номер ЗУ"; {"Кадастровый номер ОКС"; (t)=>Тext.Combine(t[Кадастровый номер ОКС];"; ")})in    to
[/vba]

до кучи 365:
[vba]
=LET(x;УНИК(Table2[Кадастровый номер ЗУ]);y;MAP(x;LAMBDA(z;ОБЪЕДИНИТЬ("; ";;ФИЛЬТР(Table2[Кадастровый номер ОКС];Table2[Кадастровый номер ЗУ]=z))));ГСТОЛБИК(x;y))
[/vba]

Автор - прохожий2019
Дата добавления - 11.05.2023 в 15:06
  • Страница 1 из 1
  • 1
Поиск:

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