let
    from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    f=(x)=>List.TransformMany(Text.Split(x{1}," / "),(x)=>{x},(c,y)=>{c}&List.Skip(x,2)),
    tr=Table.FromList(List.Combine(Table.ToList(from,f)),(x)=>x)
in
    tr

=LET(rng;B2:D6;f;LAMBDA(x;y;z;ИНДЕКС(x;y;z));res;СБРОСИТЬ(REDUCE("";ПОСЛЕД(ЧСТРОК(rng));LAMBDA(s;c;ВСТОЛБИК(s;LET(x;СЖПРОБЕЛЫ(ТЕКСТРАЗД(f(rng;c;1);;"/"));y;ВЫБОРСТРОК(f(rng;c;);ПОСЛЕД(ЧСТРОК(x);;;0) );res;ГСТОЛБИК(x;СБРОСИТЬ(y;;1));res))));1);res)

=ВЗЯТЬ(ГРУПППО(C6:C15;D6:D15;LAMBDA(a;СУММ(a)*0,22);;;-2;D6:D15>10000);5)

=LET(x;--ТЕКСТРАЗД(D2;;";");rng;A2:A11;BYROW(rng;LAMBDA(a;ИНДЕКС(x;ПОИСКПОЗ(1=1;a<=x;);1))))

=ЗАМЕНИТЬ(A1;ДЛСТР(A1)-2;10;"")
=ЛЕВСИМВ(A1;ДЛСТР(A1)-3)

=ЕСЛИ(СУММПРОИЗВ(--(СЧЁТЕСЛИМН(B3:B9;{"*н*";"*в*";"*у*"})>0))>=3;"+";"-")

=ФИЛЬТР.XML("<j><i>"&ПОДСТАВИТЬ(A2;" ";"</i><i>")&"</i></j>";"//i[last()]")

=ФИЛЬТР.XML("<j><i>"&ПОДСТАВИТЬ(A1;"_";"</i><i>")&"</i></j>";"//i[2]")

let
    from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    dct = [#"+"=(x,y)=>Value.Add(x,y),
           #"-"=(x,y)=>Value.Subtract(x,y),
           #"/"=(x,y)=>Value.Divide(x,y),
           #"*"=(x,y)=>Value.Multiply(x,y)],
    tr = Table.AddColumn(from,"tmp",(x)=>Record.Field(dct,x[Столбец2])(x[Столбец1],x[Столбец3]) )
in
    tr

 
let
    from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    nms=List.FirstN(List.Skip(Table.ColumnNames(from)),3),
    cols=List.Transform(nms,(x)=>{x,(y)=>Text.Split(y,"#(lf)")}),
    f=(x,i)=>if i>List.Count(nms)-1 then x else @f(Table.ExpandListColumn(x,nms{i}),i+1),
    to = f(Table.TransformColumns(from,cols),0)
in
   to

let
    from = Excel.CurrentWorkbook(){[Name="Команда_Образец"]}[Content],
    lst=List.Buffer({"А".."Я"}),
    count= List.Count(lst),   
    dct=Record.FromList(List.Repeat({1},count),lst),        
    f=(x)=>[
            b=Text.ToList(x),
            g=List.Transform(b,(x)=>Record.FieldOrDefault(dct,x,0)),
            pos=List.PositionOf(g,1,Occurrence.All),
            spl=Splitter.SplitTextByPositions(pos)(x) ,          
            to=if x=null  then {} else spl][to],
    spl=Table.SplitColumn(from,"Спецвозможности",f,{"1","2","3","4"})
in
    spl

=List.Sort(lst,(x)=>Text.Replace(x,"B","E"))

let
    from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    f=(x)=>[
        a=List.Last(x),
        b=if a is null then -1 else Text.PositionOf(x{1},a),
        c=if b>-1 then Text.ReplaceRange(x{1},b,Text.Length(a),"") else null,
        d=if c is null then {} else Text.Split(c,". "),
        e=h("сделано за"),g=h("план на"),
        h=(x)=>List.PositionOf(d,x,Occurrence.First,(x,y)=>Text.Contains(x,y,Comparer.OrdinalIgnoreCase)),
        res=List.Skip(x,1)&{Text.Trim(c),if e>-1 then d{e} else null,if g>-1 then d{g} else null}
    ][res],
    to=Table.FromList(Table.ToList(from,f),(x)=>x,{"Новый","Старый","Новый1","Сделано","План"}) 
in
    to

let
    from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    lst=Table.ToList(from,(x)=>[a=Text.Range(x{0},0,Text.PositionOf(x{0},x{1})-1),
                                b=Text.Split(a,". ")][b]),
    to=Table.FromList(lst,(x)=>x)                                
in
    to

let
    from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    lst=List.Buffer(список),
    c=List.Count(lst),
    len=(x)=>Text.Length(x),
    b=(x,y)=>if y+1>c then x
             else if lst{y}=Text.End(x,len(lst{y}))
             then [a=lst{y},l=len(a),c=Text.End(x,l),r=Text.Range(x,0,len(x)-l)][r] 
             else @b(x,y+1),
     l = Table.TransformColumns(from,{"заказ",(x)=>b(x,0)})
in
    l