chernoznat999
Дата: Понедельник, 08.11.2021, 17:07 |
Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация:
0
±
Замечаний:
0% ±
Добрый день, прошу помочь с решением проблемы по созданию доп отчёта. Суть следующая: есть таблица поставок товаров с количеством, датой и наименованием поставщика, необходимо все поставки собрать в текстовое поле по каждому из товаров. Прошу предложить решение именно такой задачи, так как я очень упростил ситуацию и на месте наименования поставщика может быть что угодно (поставщик, текстовый комментарий, спецификации и тд). Сам не могу понять как выдернуть по формуле не одну строку, а сразу все. Заранее благодарю за помошь.
Добрый день, прошу помочь с решением проблемы по созданию доп отчёта. Суть следующая: есть таблица поставок товаров с количеством, датой и наименованием поставщика, необходимо все поставки собрать в текстовое поле по каждому из товаров. Прошу предложить решение именно такой задачи, так как я очень упростил ситуацию и на месте наименования поставщика может быть что угодно (поставщик, текстовый комментарий, спецификации и тд). Сам не могу понять как выдернуть по формуле не одну строку, а сразу все. Заранее благодарю за помошь. chernoznat999
Ответить
Сообщение Добрый день, прошу помочь с решением проблемы по созданию доп отчёта. Суть следующая: есть таблица поставок товаров с количеством, датой и наименованием поставщика, необходимо все поставки собрать в текстовое поле по каждому из товаров. Прошу предложить решение именно такой задачи, так как я очень упростил ситуацию и на месте наименования поставщика может быть что угодно (поставщик, текстовый комментарий, спецификации и тд). Сам не могу понять как выдернуть по формуле не одну строку, а сразу все. Заранее благодарю за помошь. Автор - chernoznat999 Дата добавления - 08.11.2021 в 17:07
chernoznat999
Дата: Понедельник, 08.11.2021, 18:02 |
Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация:
0
±
Замечаний:
0% ±
bigor, офис новый, но эта функция объединяет только что я могу ей указать, а проблема что я не могу додуматься как мне указать взять все поставки соответствующие конкретному товару. Пробовал соорудить через ВПР вытаскивать отдельные значения колонок и потом соединять через СЦЕП, но ВПР вытаскивает только первое попавшееся значение, а не все что найдёт.
bigor, офис новый, но эта функция объединяет только что я могу ей указать, а проблема что я не могу додуматься как мне указать взять все поставки соответствующие конкретному товару. Пробовал соорудить через ВПР вытаскивать отдельные значения колонок и потом соединять через СЦЕП, но ВПР вытаскивает только первое попавшееся значение, а не все что найдёт. chernoznat999
Ответить
Сообщение bigor, офис новый, но эта функция объединяет только что я могу ей указать, а проблема что я не могу додуматься как мне указать взять все поставки соответствующие конкретному товару. Пробовал соорудить через ВПР вытаскивать отдельные значения колонок и потом соединять через СЦЕП, но ВПР вытаскивает только первое попавшееся значение, а не все что найдёт. Автор - chernoznat999 Дата добавления - 08.11.2021 в 18:02
китин
Дата: Вторник, 09.11.2021, 15:11 |
Сообщение № 10
Группа: Модераторы
Ранг: Экселист
Сообщений: 7027
Репутация:
1076
±
Замечаний:
0% ±
Excel 2007;2010;2016
PQ всемогущий
[vba]
Код
let Источник = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content], #"Измененный тип" = Table.TransformColumnTypes(Источник,{{"Дата", type date}}), #"Сгруппированные строки" = Table.Group(#"Измененный тип", {"Товар"}, {{"Количество", each _, type table}}), #"Развернутый элемент Количество" = Table.ExpandTableColumn(#"Сгруппированные строки", "Количество", {"Кол-во", "Дата", "Поставщик"}, {"Кол-во", "Дата", "Поставщик"}), #"Переупорядоченные столбцы" = Table.ReorderColumns(#"Развернутый элемент Количество",{"Товар", "Поставщик", "Кол-во", "Дата"}), #"Вставлено: объединенный столбец" = Table.AddColumn(#"Переупорядоченные столбцы", "Сведено", each Text.Combine({[Поставщик], Text.From([#"Кол-во"], "ru-RU")}, " -"), type text), #"Переупорядоченные столбцы1" = Table.ReorderColumns(#"Вставлено: объединенный столбец",{"Товар", "Поставщик", "Кол-во", "Сведено", "Дата"}), #"Объединенные столбцы" = Table.CombineColumns(Table.TransformColumnTypes(#"Переупорядоченные столбцы1", {{"Дата", type text}}, "ru-RU"),{"Сведено", "Дата"},Combiner.CombineTextByDelimiter(" от ", QuoteStyle.None),"Сведено.1"), #"Удаленные столбцы" = Table.RemoveColumns(#"Объединенные столбцы",{"Поставщик", "Кол-во"}), #"Сгруппированные строки1" = Table.Group(#"Удаленные столбцы", {"Товар"}, {{"Количество", each _, type table}}), #"Добавлен пользовательский объект" = Table.AddColumn(#"Сгруппированные строки1", "Пользовательская", each Table.Column([Количество],"Сведено.1")), #"Извлеченные значения" = Table.TransformColumns(#"Добавлен пользовательский объект", {"Пользовательская", each Text.Combine(List.Transform(_, Text.From), ";"), type text}), #"Удаленные столбцы1" = Table.RemoveColumns(#"Извлеченные значения",{"Количество"}) in #"Удаленные столбцы1"
[/vba]
PQ всемогущий
[vba]
Код
let Источник = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content], #"Измененный тип" = Table.TransformColumnTypes(Источник,{{"Дата", type date}}), #"Сгруппированные строки" = Table.Group(#"Измененный тип", {"Товар"}, {{"Количество", each _, type table}}), #"Развернутый элемент Количество" = Table.ExpandTableColumn(#"Сгруппированные строки", "Количество", {"Кол-во", "Дата", "Поставщик"}, {"Кол-во", "Дата", "Поставщик"}), #"Переупорядоченные столбцы" = Table.ReorderColumns(#"Развернутый элемент Количество",{"Товар", "Поставщик", "Кол-во", "Дата"}), #"Вставлено: объединенный столбец" = Table.AddColumn(#"Переупорядоченные столбцы", "Сведено", each Text.Combine({[Поставщик], Text.From([#"Кол-во"], "ru-RU")}, " -"), type text), #"Переупорядоченные столбцы1" = Table.ReorderColumns(#"Вставлено: объединенный столбец",{"Товар", "Поставщик", "Кол-во", "Сведено", "Дата"}), #"Объединенные столбцы" = Table.CombineColumns(Table.TransformColumnTypes(#"Переупорядоченные столбцы1", {{"Дата", type text}}, "ru-RU"),{"Сведено", "Дата"},Combiner.CombineTextByDelimiter(" от ", QuoteStyle.None),"Сведено.1"), #"Удаленные столбцы" = Table.RemoveColumns(#"Объединенные столбцы",{"Поставщик", "Кол-во"}), #"Сгруппированные строки1" = Table.Group(#"Удаленные столбцы", {"Товар"}, {{"Количество", each _, type table}}), #"Добавлен пользовательский объект" = Table.AddColumn(#"Сгруппированные строки1", "Пользовательская", each Table.Column([Количество],"Сведено.1")), #"Извлеченные значения" = Table.TransformColumns(#"Добавлен пользовательский объект", {"Пользовательская", each Text.Combine(List.Transform(_, Text.From), ";"), type text}), #"Удаленные столбцы1" = Table.RemoveColumns(#"Извлеченные значения",{"Количество"}) in #"Удаленные столбцы1"
[/vba]
китин
Не судите очень строго:я пытаюсь научиться ЯД 41001877306852
Ответить
Сообщение PQ всемогущий
[vba]
Код
let Источник = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content], #"Измененный тип" = Table.TransformColumnTypes(Источник,{{"Дата", type date}}), #"Сгруппированные строки" = Table.Group(#"Измененный тип", {"Товар"}, {{"Количество", each _, type table}}), #"Развернутый элемент Количество" = Table.ExpandTableColumn(#"Сгруппированные строки", "Количество", {"Кол-во", "Дата", "Поставщик"}, {"Кол-во", "Дата", "Поставщик"}), #"Переупорядоченные столбцы" = Table.ReorderColumns(#"Развернутый элемент Количество",{"Товар", "Поставщик", "Кол-во", "Дата"}), #"Вставлено: объединенный столбец" = Table.AddColumn(#"Переупорядоченные столбцы", "Сведено", each Text.Combine({[Поставщик], Text.From([#"Кол-во"], "ru-RU")}, " -"), type text), #"Переупорядоченные столбцы1" = Table.ReorderColumns(#"Вставлено: объединенный столбец",{"Товар", "Поставщик", "Кол-во", "Сведено", "Дата"}), #"Объединенные столбцы" = Table.CombineColumns(Table.TransformColumnTypes(#"Переупорядоченные столбцы1", {{"Дата", type text}}, "ru-RU"),{"Сведено", "Дата"},Combiner.CombineTextByDelimiter(" от ", QuoteStyle.None),"Сведено.1"), #"Удаленные столбцы" = Table.RemoveColumns(#"Объединенные столбцы",{"Поставщик", "Кол-во"}), #"Сгруппированные строки1" = Table.Group(#"Удаленные столбцы", {"Товар"}, {{"Количество", each _, type table}}), #"Добавлен пользовательский объект" = Table.AddColumn(#"Сгруппированные строки1", "Пользовательская", each Table.Column([Количество],"Сведено.1")), #"Извлеченные значения" = Table.TransformColumns(#"Добавлен пользовательский объект", {"Пользовательская", each Text.Combine(List.Transform(_, Text.From), ";"), type text}), #"Удаленные столбцы1" = Table.RemoveColumns(#"Извлеченные значения",{"Количество"}) in #"Удаленные столбцы1"
[/vba]
Автор - китин Дата добавления - 09.11.2021 в 15:11