// PQ (2)
let
Источник = Excel.CurrentWorkbook(){[Name="нужное"]}[Content],
#"Added Index" = Table.AddIndexColumn(Источник, "Индекс", 0, 1),
#"Replaced Value" = Table.ReplaceValue(#"Added Index",null,"",Replacer.ReplaceValue,{"Каб.1", "Каб.2", "Каб.3", "Каб.4", "Каб.5", "Каб.6", "Каб.7", "Каб.8", "Каб.9"}),
#"Unpivoted Columns" = Table.UnpivotOtherColumns(#"Replaced Value", {"Курс", "Вид", "Слияние пожелания (курс, вид, дисциплина)", "Слияние группы (курс, вид)", "Строки (услов. форматир)", "№ п/п (журналы)", "Сокращенное название", "Журналы", "1 пол.", "2 пол.", "Форма пров. уч. зан.", "Отделение", "Дисцилина", "Группа", "Часы (1 п)", "Часы (2п)", "Ф.п.а (1 п)", "Ф.п.а (2 п)", "Преподаватель", "Кол. чел. (9/11/об.)", "Ко-во недель", "Пож-ние выходные дни ", "Примечание","Индекс"}, "Атрибут", "Значение"),
#"Split Column by Position" = Table.SplitColumn(#"Unpivoted Columns", "Атрибут", Splitter.SplitTextByPositions({0, 1}, true), {"Атрибут.1", "Атрибут.2"}),
#"Pivoted Column" = Table.Pivot(#"Split Column by Position", List.Distinct(#"Split Column by Position"[Атрибут.1]), "Атрибут.1", "Значение"),
#"Filtered Rows" = Table.SelectRows(#"Pivoted Column", each ([День] <> null) and ([Урок]<>null)),
#"Removed Columns" = Table.RemoveColumns(#"Filtered Rows",{"Индекс", "Атрибут.2"}),
#"Inserted Merged Column" = Table.AddColumn(#"Removed Columns", "Ключ1а", each Text.Combine({[#"1 пол."], Text.From([Курс], "ru-RU"), [День], [Вид], Text.From([Урок], "ru-RU")}, ""), type text),
#"Inserted Merged Column1" = Table.AddColumn(#"Inserted Merged Column", "Ключ1б", each Text.Combine({Text.From([Сокращенное название], "ru-RU"), [Преподаватель], Text.From([#"Каб."], "ru-RU")}, " "), type text),
#"Inserted Merged Column2" = Table.AddColumn(#"Inserted Merged Column1", "Ключ2а", each Text.Combine({[#"2 пол."], Text.From([Курс], "ru-RU"), [День], [Вид], Text.From([Урок], "ru-RU")}, ""), type text),
Custom1 = Table.DuplicateColumn(#"Inserted Merged Column2", "Ключ1б", "Ключ2б"),
Custom2 = Table.SelectColumns(Custom1,{"Курс", "Вид", "Сокращенное название", "1 пол.", "2 пол.", "Форма пров. уч. зан.", "Дисцилина", "Группа", "Преподаватель", "День", "Урок", "Каб.", "Ключ1а", "Ключ1б", "Ключ2а", "Ключ2б"}),
#"Replaced Value1" = Table.ReplaceValue(Custom2,"",null,Replacer.ReplaceValue,{"Каб."})
in
#"Replaced Value1" |