jakim
Дата: Понедельник, 29.01.2024, 18:58 |
Сообщение № 7
Группа: Друзья
Ранг: Старожил
Сообщений: 1216
Репутация:
316
±
Замечаний:
0% ±
Excel 2010
Power Query
[vba]Код
let Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content], #"Changed Type" = Table.TransformColumnTypes(Source,{{"Регион", type text}, {"Магазин", Int64.Type}, {"Отдел", Int64.Type}, {"Подотдел", Int64.Type}, {"Тип", Int64.Type}, {"Артикул", Int64.Type}, {"Наименование", type text}, {"Статус", type text}, {"ТОП", Int64.Type}, {"Гамма", type text}, {"Логистический ТОП", type text}, {"Теор. сток", Int64.Type}, {"Best", type any}, {"Срок поставки м агазтн", Int64.Type}, {"Задержка поставки", Int64.Type}, {"СДП", type number}, {"СДП Н-1", type any}, {"СДП Н-2", type any}, {"Прогресс СДП", type any}, {"Бастион", Int64.Type}}), #"Merged Queries" = Table.NestedJoin(#"Changed Type", {"Магазин", "Артикул"}, Table2, {"Магазин", "Арт"}, "Table2", JoinKind.LeftOuter), #"Expanded Table2" = Table.ExpandTableColumn(#"Merged Queries", "Table2", {"Продажи за неделю"}, {"Table2.Продажи за неделю"}), #"Removed Other Columns" = Table.SelectColumns(#"Expanded Table2",{"Table2.Продажи за неделю"}), #"Renamed Columns" = Table.RenameColumns(#"Removed Other Columns",{{"Table2.Продажи за неделю", "Продажи за неделю"}}) in #"Renamed Columns"
[/vba]
Power Query
[vba]Код
let Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content], #"Changed Type" = Table.TransformColumnTypes(Source,{{"Регион", type text}, {"Магазин", Int64.Type}, {"Отдел", Int64.Type}, {"Подотдел", Int64.Type}, {"Тип", Int64.Type}, {"Артикул", Int64.Type}, {"Наименование", type text}, {"Статус", type text}, {"ТОП", Int64.Type}, {"Гамма", type text}, {"Логистический ТОП", type text}, {"Теор. сток", Int64.Type}, {"Best", type any}, {"Срок поставки м агазтн", Int64.Type}, {"Задержка поставки", Int64.Type}, {"СДП", type number}, {"СДП Н-1", type any}, {"СДП Н-2", type any}, {"Прогресс СДП", type any}, {"Бастион", Int64.Type}}), #"Merged Queries" = Table.NestedJoin(#"Changed Type", {"Магазин", "Артикул"}, Table2, {"Магазин", "Арт"}, "Table2", JoinKind.LeftOuter), #"Expanded Table2" = Table.ExpandTableColumn(#"Merged Queries", "Table2", {"Продажи за неделю"}, {"Table2.Продажи за неделю"}), #"Removed Other Columns" = Table.SelectColumns(#"Expanded Table2",{"Table2.Продажи за неделю"}), #"Renamed Columns" = Table.RenameColumns(#"Removed Other Columns",{{"Table2.Продажи за неделю", "Продажи за неделю"}}) in #"Renamed Columns"
[/vba]jakim
Ответить
Сообщение Power Query
[vba]Код
let Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content], #"Changed Type" = Table.TransformColumnTypes(Source,{{"Регион", type text}, {"Магазин", Int64.Type}, {"Отдел", Int64.Type}, {"Подотдел", Int64.Type}, {"Тип", Int64.Type}, {"Артикул", Int64.Type}, {"Наименование", type text}, {"Статус", type text}, {"ТОП", Int64.Type}, {"Гамма", type text}, {"Логистический ТОП", type text}, {"Теор. сток", Int64.Type}, {"Best", type any}, {"Срок поставки м агазтн", Int64.Type}, {"Задержка поставки", Int64.Type}, {"СДП", type number}, {"СДП Н-1", type any}, {"СДП Н-2", type any}, {"Прогресс СДП", type any}, {"Бастион", Int64.Type}}), #"Merged Queries" = Table.NestedJoin(#"Changed Type", {"Магазин", "Артикул"}, Table2, {"Магазин", "Арт"}, "Table2", JoinKind.LeftOuter), #"Expanded Table2" = Table.ExpandTableColumn(#"Merged Queries", "Table2", {"Продажи за неделю"}, {"Table2.Продажи за неделю"}), #"Removed Other Columns" = Table.SelectColumns(#"Expanded Table2",{"Table2.Продажи за неделю"}), #"Renamed Columns" = Table.RenameColumns(#"Removed Other Columns",{{"Table2.Продажи за неделю", "Продажи за неделю"}}) in #"Renamed Columns"
[/vba]Автор - jakim Дата добавления - 29.01.2024 в 18:58