let
    Source = #table({"text","tab"},{{"t", #table({"a","b"},{{1,2}})}}),
    Added = Table.AddColumn(Source, "tab2", each let x=[text] in Table.AddColumn([tab], "tab2", each x))
in
    Added

let
    head = [
    Accept = "application/json",
    #"Accept-Encoding" = "gzip, deflate",
    #"Accept-Language" = "ru",
    api_version = "1.1",
    app_version = "web-2.0.0",
    companyId = "78",
    Connection = "keep-alive",
    #"Content-Type" = "application/json;charset=utf-8",
    Origin = "https://lebazar.uz",
    Referer = "https://lebazar.uz/",
    #"User-Agent" = "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/101.0.4951.54 Safari/537.36"
    ],
    Source = Json.Document(Web.Contents("https://web.lebazar.uz/api/v1/search/product?categoryId=80&start=30&limit=20", [Headers=head]))
in
    Source

let
    Source = Lines.FromBinary(Web.Contents("http://www.consultant.ru/law/ref/calendar/proizvodstvennye/2022/?")),
    #"Converted to Table" = Table.FromList(Source, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
    #"Filtered Rows" = Table.SelectRows(#"Converted to Table", each Text.StartsWith([Column1], "#(tab)#(tab)#(tab)<td class=")),
    #"Replaced Value" = Table.ReplaceValue(#"Filtered Rows","</tr><tr>","",Replacer.ReplaceText,{"Column1"}),
    #"Added Index" = Table.AddIndexColumn(#"Replaced Value", "Номер Месяца", 1, 1),
    #"Added Prefix" = Table.TransformColumns(#"Added Index", {{"Column1", each Text.Split(_,"</td><td class="), type text}}),
    #"Expanded Custom" = Table.ExpandListColumn(#"Added Prefix", "Column1"),
    #"Filtered Rows1" = Table.SelectRows(#"Expanded Custom", each not Text.Contains([Column1], "inactively")),
    #"Replaced Value1" = Table.ReplaceValue(#"Filtered Rows1","#(tab)#(tab)#(tab)<td class=","",Replacer.ReplaceText,{"Column1"}),
    #"Split Column by Delimiter" = Table.SplitColumn(#"Replaced Value1", "Column1", Splitter.SplitTextByEachDelimiter({">"}, QuoteStyle.Csv, false), {"Тип дня", "День"}),
    #"Extracted Text Before Delimiter" = Table.TransformColumns(#"Split Column by Delimiter", {{"День", each Text.BeforeDelimiter(_, "<"), type text}}),
    #"Changed Type" = Table.TransformColumnTypes(#"Extracted Text Before Delimiter",{{"День", Int64.Type}})
in
    #"Changed Type"

let
  src = Excel.CurrentWorkbook(){[ Name = "Данные" ]}[Content],
  typed = Table.TransformColumnTypes ( src, { { "начало аренды", type date }, { "окончание аренды", type date } } ),
  addDatesLst = Table.AddColumn (
    typed,
    "дата",
    each List.Dates ( [начало аренды], Duration.TotalDays ( [окончание аренды] - [начало аренды] ) + 1, #duration ( 1, 0, 0, 0 ) ),
    type {date}
  ),
  delClmns = Table.RemoveColumns ( addDatesLst, { "начало аренды", "окончание аренды" } ),
  expandDates = Table.ExpandListColumn ( delClmns, "дата" ),
  addDayCost = Table.AddColumn ( expandDates, "стоиомость аренды в день", each [стоимость аренды в месяц] / Date.DaysInMonth ( [дата] ), type number ),
  dekClmns2 = Table.RemoveColumns ( addDayCost, { "стоимость аренды в месяц" } )
in
  dekClmns2

let
    fn = (t as table)=>
    let
        #"Добавлен пользовательский объект" = Table.AddColumn(t, "Пользовательская", each List.Repeat({[код]}, if [код]="5" then 2 else 1)),
        #"Развернутый элемент Пользовательская" = Table.ExpandListColumn(#"Добавлен пользовательский объект", "Пользовательская")
    in
        #"Развернутый элемент Пользовательская",

    Источник = Excel.CurrentWorkbook(){[Name="Таблица2"]}[Content],
    #"Измененный тип" = Table.TransformColumnTypes(Источник,{{"код", type text}, {"сумма", Int64.Type}}),
    Custom1 = fn(#"Измененный тип")
in
    Custom1

let
    Source = Table.FromColumns({{3,65,123}}, type table [dur=Int64.Type]),
    Added = Table.AddColumn(Source, "list", each List.Repeat( {60}, Number.IntegerDivide([dur],60))&{Number.Mod([dur],60)})
in
    Added