let
    Source = Excel.Workbook(File.Contents("D:\Documents\PQ.Смета.xlsx"), null, true),
    SourceItem = Source{[Item="ЛСР 17 граф",Kind="Sheet"]}[Data],
    SetHeader = Table.PromoteHeaders(SourceItem, [PromoteAllScalars=true]),
    SkipHeaderShit = Table.Skip(SetHeader,3),
    SkipColumnShit = Table.SelectColumns(SkipHeaderShit,{"№ пп", "Наименование", "Ед. изм.", "Общая стоимость, руб."}),
    FillDown = Table.FillDown(SkipColumnShit,{"№ пп"}),
    DisassembleCost = Table.TransformColumns(FillDown, {{"Общая стоимость, руб.", each Text.AfterDelimiter(Text.From(_, "ru-RU"), "#(lf)", {0, RelativePosition.FromEnd}), type text}}),
    Grouped = Table.Group(DisassembleCost, {"№ пп"}, {{"Стоимость", each List.Max([#"Общая стоимость, руб."]), type text}}),
    Joined = Table.NestedJoin(FillDown,{"№ пп"},Grouped,{"№ пп"},"NewColumn",JoinKind.LeftOuter),
    Expanded = Table.ExpandTableColumn(Joined, "NewColumn", {"Стоимость"}, {"Стоимость"}),
    FilterShit = Table.SelectRows(Expanded, each ([#"Ед. изм."] <> null)),
    Remove = Table.SelectColumns(FilterShit,{"№ пп", "Наименование", "Стоимость"}),
    Rename = Table.RenameColumns(Remove,{{"Стоимость", "Общая стоимость, руб."}})
in
    Rename