if range("A1").Value>0 then range("D1").Value=range("B1").Value+range("C1").Value else  range("D1").Value=nothing

let
    Source = Table2,
    lst = Table.ToList(Source,(x)=>List.Skip( if x{1}<>null then x&{x{0}} else x&{null})),
    to = Table.FromList(lst, (x)=>x,{"Condition","Answer"})
in
    to

let
    from = "<div itemprop=""description"">
<p>
<strong>Материалы:</strong> 
экокожа премиум, натуральная кожа
<br>
<strong>Каркас:</strong> 
деревянные, из массива бука 4 цветов - венге, орех гамильтон, орех, темный орех аида
</p> 
</div>",
    lst = List.Select( Text.Split( from,"<strong>"),(x)=>Text.Contains(x,"strong")),
    f = (x)=> List.Accumulate({"</strong>","<br>","</p>","</div>"},x,(s,c)=>Text.Trim( Text.Replace(s,c,""))),
    to = Text.Combine( List.Transform( lst,f))
in
    to

let
    Источник = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    PromoteHeaders = Table.PromoteHeaders(Источник, [PromoteAllScalars=true]),
    trf = Table.TransformColumns(PromoteHeaders,{{"Период",(x)=> Date.MonthName(Date.From(x)), type text}}),
    gr = Table.Group(trf, {"Период", "Работник"}, {{"tmp", (x)=>Text.Combine( x[Должность],"#(lf)")}})
in
    gr

let
    Источник = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    typ = Table.TransformColumnTypes(Источник,{{"Фамилия", type text}, {"Имя", type text}, {"Дата начала", type text}, {"Дата конец", type text}, {"Город", type text}}),
    nms = List.Buffer( Table.ColumnNames(Источник)),
    lst = Table.ToRows( typ),
    f=(x)=>[a = List.Combine( List.Zip({nms, x})),
    b = x&{Text.Combine( a,": ")}][b],
    #"Преобразовано в таблицу" = Table.FromList(lst, f,nms&{"tt"})
in
    #"Преобразовано в таблицу"

let
    Источник = 
Table.TransformColumnTypes(Excel.CurrentWorkbook(){[Name="Table1"]}[Content],{{"Дата",
 type datetime}, {"Содержание", type text}, {"Дебет", Int64.Type}, 
{"Кредит", Int64.Type}, {"Сумма", Int64.Type}}),
    lst = Table.ToList( Источник,(r)=>List.Accumulate({2..3},{},(s,c)=>s&{List.ReplaceRange(r,c,1,{null})})),
    cmb = Table.FromRows( List.Combine( lst), Table.ColumnNames(Источник))
in
    cmb

let
    Источник = Excel.CurrentWorkbook(){[Name="Таблица3"]}[Content],
    typ = Table.TransformColumnTypes(Источник,{{"Дата", type date}}),
    lst = Table.ToRows( typ),
    f = (x)=> List.Skip(List.Combine(Table.ToRows(Table.SelectRows(Справочник, each [#"Дата с "] <= x{0} and [Дата По] >= x{0}))),2),
    frl = Table.FromList(lst,(x)=>x&f(x),{"Дата"}&List.Skip(Table.ColumnNames(Справочник),2)),
    to = Table.TransformColumnTypes(frl,{{"Резерв %", Percentage.Type}, {"СП%", Percentage.Type}})
in
    to

let
    f=(t)=>[    b = List.Transform({1..t{3}},(x)=>Date.AddMonths(t{1},x)),
    c = List.Transform(b,(x)=>Date.AddDays(x, if Date.DayOfWeek(x)=6 or Date.DayOfWeek(x)=5 then 7-Date.DayOfWeek(x) else 0)),
    d = t&{c}][d],
    from = Excel.Workbook(File.Contents("Путь ваш к файлу"), null, true){[Item="Лист1",Kind="Sheet"]}[Data],
    head = Table.PromoteHeaders(from, [PromoteAllScalars=true]),
    lst = Table.ToRows(head),
    fl = Table.FromList(lst,f,{"Клиент","Дата","оплата в месяц","Месяцы","Дата погашения"}),
    exp = Table.ExpandListColumn(fl, "Дата погашения")
in
    exp

let
    Источник = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    Измененный = Table.TransformColumnTypes(Источник,{{"Дата", type date}, {"Наименование", type text}, {"Кол-во", Int64.Type}}),
    Пользовательский1 = Table.Repeat(Измененный,1),
    tbl = Table.AddColumn(Пользовательский1, "Цена", each Цены, type table),
    replace = Table.FromRecords (Table.TransformRows (tbl, (r) =>Record.TransformFields (r,{{"Цена", ( x ) => if r[Наименование] = x[Наименование] and r[Дата]<=x[Дата] then x[Цена] else x[Цена] }})),Value.Type (tbl) )
in
    replace