let
    Источник = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    #"Пониженные заголовки" = Table.DemoteHeaders(Источник),
    #"Транспонированная таблица" = Table.Transpose(#"Пониженные заголовки"),
    #"Повышенные заголовки" = Table.PromoteHeaders(#"Транспонированная таблица", [PromoteAllScalars=true]),
    #"Извлеченный текст перед разделителем" = Table.TransformColumns(#"Повышенные заголовки", {{"Column1", each Text.BeforeDelimiter(_, "_"), type text}}),
    #"Несвернутые столбцы" = Table.UnpivotOtherColumns(#"Извлеченный текст перед разделителем", {"Column1", "Период"}, "Атрибут", "Значение"),
    #"Сведенный столбец" = Table.Pivot(#"Несвернутые столбцы", List.Distinct(#"Несвернутые столбцы"[Column1]), "Column1", "Значение"),
    #"Переупорядоченные столбцы" = Table.ReorderColumns(#"Сведенный столбец",{"Атрибут", "Период", "Ибрагимова", "Уфа", "Победы", "Челны", "Альметьевск"}),
    #"Сортированные строки" = Table.Sort(#"Переупорядоченные столбцы",{{"Период", Order.Ascending}, {"Атрибут", Order.Ascending}})
in
    #"Сортированные строки"