let
    h=(s,c)=>Number.From(c<>null),
    f=(x)=>[a=(tb,lst)=>Record.FromList(List.RemoveNulls(Record.ToList(tb{0})),lst),
            b=Table.Group(Table.Skip(x),"Column2",{"tmp",g},GroupKind.Local,h),
            g=(w)=>((a1)=>Table.Skip(Table.ReplaceRows(w,1,1,{a1})))(w{1} & a(w,{"Column1","Column2"})),
            c=Table.Combine(b[tmp]),
            d=Table.SplitColumn(c,"Column1",(x)=>{null,null,x},{"1","2","3"}),
            e=Table.ReplaceRows(d,0,1,{d{0} & a(x,{"1","2"})})][e],

    from = Excel.CurrentWorkbook(){[Name="data"]}[Content],
    gr=Table.Group(from,"Column1",{"tmp",f},GroupKind.Local,h),
    sel=Table.SelectRows(gr,(x)=>x[Column1]=УК)[tmp]{0}
in
    sel