Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Транспортировать информацию из одного столбца в несколько
 
#1
02.09.2021 10:00:12
Ребята, привет )
Столкнулась с проблемой. Есть выгрузка в два столбца. Мне нужно транспортировать информацию из второго в пять столбцов другой таблицы. Есть идеи как это можно сделать? Можно как-то привязаться к названиям, так как последовательности в нумерации нет - много мусорной информации.
 
 
 
#2
02.09.2021 10:28:32
Ввести в A2 на листе Лист3 и протянуть на все целевые поля:
=ИНДЕКС(Лист2!$B$1:$B$40;АГРЕГАТ(15;6;СТРОКА(Лист2!$1:$40)/(Лист2!$A$1:$A$40=A$1);СТРОКА()-СТРОКА($1:$1)))

Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori
 
 
 
#3
02.09.2021 10:34:02
Как то так)
 
 
 
#4
02.09.2021 10:41:45
Код
=ФИЛЬТР(B1:B40;A1:A40="ФИО"),
=ФИЛЬТР(B1:B40;A1:A40="Email")
=ФИЛЬТР(B1:B40;A1:A40="Номер заказа")

=ПОДСТАВИТЬ(ФИЛЬТР.XML("<j><i>"&ПОДСТАВИТЬ(ОБЪЕДИНИТЬ(СИМВОЛ(1);1;A1:A40&B1:B40);СИМВОЛ(1);"</i><i>")&"</i></j>";"//i[contains(.,'ФИО')]");"ФИО";"")
=ПОДСТАВИТЬ(ФИЛЬТР.XML("<j><i>"&ПОДСТАВИТЬ(ОБЪЕДИНИТЬ(СИМВОЛ(1);1;A1:A40&B1:B40);СИМВОЛ(1);"</i><i>")&"</i></j>";"//i[contains(.,'Email')]");"Email";"")
=ПОДСТАВИТЬ(ФИЛЬТР.XML("<j><i>"&ПОДСТАВИТЬ(ОБЪЕДИНИТЬ(СИМВОЛ(1);1;A1:A40&B1:B40);СИМВОЛ(1);"</i><i>")&"</i></j>";"//i[contains(.,'Номер заказа')]");"Номер заказа";"")
=ПОДСТАВИТЬ(ФИЛЬТР.XML("<j><i>"&ПОДСТАВИТЬ(ОБЪЕДИНИТЬ(СИМВОЛ(1);1;A1:A40&B1:B40);СИМВОЛ(1);"</i><i>")&"</i></j>";"//i[contains(.,'Дата оплаты')]");"Дата оплаты";"")
=ПОДСТАВИТЬ(ФИЛЬТР.XML("<j><i>"&ПОДСТАВИТЬ(ОБЪЕДИНИТЬ(СИМВОЛ(1);1;A1:A40&B1:B40);СИМВОЛ(1);"</i><i>")&"</i></j>";"//i[contains(.,'Сумма')]");"Сумма";"")
Изменено: Тимофеев - 02.09.2021 11:01:16
 
 
 
#5
02.09.2021 11:01:30
Или PQ
Код
let
    Источник = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    #"Строки с примененным фильтром" = Table.SelectRows(Источник, each not Text.Contains([мусорная информация 4], "мусор")),
    #"Добавлен индекс" = Table.AddIndexColumn(#"Строки с примененным фильтром", "Индекс", 0, 1),
    #"Столбец с выполненным целочисленным делением" = Table.TransformColumns(#"Добавлен индекс", {{"Индекс", each Number.IntegerDivide(_, 5)+1, Int64.Type}}),
    #"Сведенный столбец" = Table.Pivot(#"Столбец с выполненным целочисленным делением", List.Distinct(#"Столбец с выполненным целочисленным делением"[#"мусорная информация 4"]), "мусорная информация 4", "мусорная информация 14"),
    #"Разделить столбец по разделителю1" = Table.SplitColumn(Table.TransformColumnTypes(#"Сведенный столбец", {{"Индекс", type text}}, "ru-RU"), "Индекс", Splitter.SplitTextByDelimiter(",", QuoteStyle.Csv), {"Индекс", "Опл.", "Заказ", "Оплата"}),
    #"Переупорядоченные столбцы" = Table.ReorderColumns(#"Разделить столбец по разделителю1",{"Индекс", "ФИО", "Email", "Опл.", "Номер заказа", "Заказ", "Оплата", "Дата оплаты", "Сумма"}),
    #"Измененный тип" = Table.TransformColumnTypes(#"Переупорядоченные столбцы",{{"Индекс", Int64.Type}, {"ФИО", type text}, {"Email", type text}, {"Номер заказа", Int64.Type}, {"Оплата", type number}, {"Опл.", type number}, {"Дата оплаты", type date}, {"Сумма", type number}})
in
    #"Измененный тип"
Изменено: Msi2102 - 02.09.2021 11:06:58
 
 
 
#6
02.09.2021 11:07:38
Цитата
Дарья Адамовская:Ребята, привет
здравствуйте. У нас и девочки есть, если что  ;) Их не много, но тем ценнее  :idea: 8)

Приём Импорт "плавающего" фрагмента в Power Query смотрели?
Изменено: Jack Famous - 02.09.2021 11:08:06
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
 
 
 
#7
03.09.2021 05:56:54
Msi2102, Тимофеев, Андрей_26, JayBhagavan, огромное спасибо, с вашей помощью у меня все получилось  :)
Jack Famous, буду иметь в виду. Спасибо  ;)  
 
 
 
Страницы: 1
Наверх