let
    Источник = Excel.Workbook(File.Contents("D:\Хазратхон\Учеба\power bi\Bob\2. Отчетная дата\Портфель\Портфель 01.01.2022.xlsx"), null, true),
    #"D:\Хазратхон\Учеба\power bi\Bob\2. Отчетная дата\Портфель\_Портфель 17.12.2021.xlsx" = Источник{[Item="Лист1",Kind="Sheet"]}[Data],
    Data = Источник{[Item="Лист1",Kind="Sheet"]}[Data],
    #"Добавлен пользовательский объект" = Table.AddColumn(Data, "Дата отчета", each Data{0}[Column2]),
    #"Разделить столбец по положению" = Table.SplitColumn(#"Добавлен пользовательский объект", "Дата отчета", Splitter.SplitTextByPositions({0, 10}, false), {"Дата отчета.1", "Дата отчета.2"}),
    #"Удаленные столбцы" = Table.RemoveColumns(#"Разделить столбец по положению",{"Дата отчета.2"}),
    #"Пониженные заголовки" = Table.DemoteHeaders(#"Удаленные столбцы"),
    Лист1 = List.LastN(Record.ToList(#"Пониженные заголовки"{0}),1),
    Лист2 = List.FirstN(Record.ToList(#"Пониженные заголовки"{2}),205),
    ЗаголовкиЛист = Лист2&Лист1,
    Пользовательский1 = #"Пониженные заголовки",
    #"Удаленные верхние строки" = Table.Skip(Пользовательский1,3),
    Пользовательский2 = Table.RenameColumns(#"Удаленные верхние строки", List.Zip({Table.ColumnNames(#"Удаленные верхние строки"), ЗаголовкиЛист}))
in
    Пользовательский2