площадь посева:=IF([Сумма затрат] > 0, SUM('СПП'[Площадь]), BLANK())

площадь посева:=IF(ISFILTERED('Затраты'[Статья затрат]), BLANK(), SUM('СПП'[Площадь]))

let
    data = List.Buffer(Excel.CurrentWorkbook(){[Name="Table1"]}[Content][Столбец]),
    result = #table(
        {"type"} & List.Alternate(data, 6, 3, 3), 
        List.Zip(List.Split({"Раб", "Кал"} & List.Alternate(data, 3, 6), 2))
    )
in
    result

let
    src=Table.PromoteHeaders(Excel.CurrentWorkbook(){[Name="data"]}[Content]),
    done = List.Buffer(List.PositionOf(src[контроль], "есть", Occurrence.All)),
    to_do = Number.RoundDown(Table.RowCount(src) * src{0}[процент] / 100) - List.Count(done),
    done_pos = List.Buffer(List.FirstN(List.RemoveItems(List.Positions(src[контроль]), done), to_do) & done),
    result = Table.TransformColumns(
        Table.AddIndexColumn(src, "требуется"),
        {"требуется", (x) => if List.Contains(done_pos, x) then 1 else 0}
    )
in
    result