let

    Source = {
        [Name = "gold_am", URL = "https://prices.lbma.org.uk/json/gold_am.json "],
        [Name = "gold_pm", URL = "https://prices.lbma.org.uk/json/gold_pm.json "],
        [Name = "silver",  URL = "https://prices.lbma.org.uk/json/silver.json "]},

    get = (x) => [json = Json.Document(Web.Contents(x[URL])), 
                fields = (y) => 
            [Name = x[Name], 
            Date = Date.From(y[d]), 
            Usd = y[v]{0}],
            res = List.Transform(json, fields)][res],
    ltr = List.Transform(Source, get),
    tbl = Table.FromRecords(List.Combine(ltr), type table[Name = text, Date = date, Usd = number])
in
    tbl

let
    W = (x)=> Table.FromRecords(Json.Document(Web.Contents(x))),
    T = Table.FromRows({
        {"gold_am", "https://prices.lbma.org.uk/json/gold_am.json"},
        {"gold_pm",  "https://prices.lbma.org.uk/json/gold_pm.json"},
        {"silver", "https://prices.lbma.org.uk/json/silver.json"}
    }, {"Name", "URL"}),
    TR = Table.TransformColumns(T,{"URL", W}),
    Expand = Table.ExpandTableColumn(TR, "URL", {"d", "v"}),
    Tr2 = Table.TransformColumns(Expand, {{"v", (x)=> x{0}}, {"d", Date.From}})
in
    Tr2

Const firstCell = "C4:aaa4"

=ПРОСМОТР($V$6;
((U8-U8*(90-СТРОКА($10:$899))%)-T8-
(((U8-U8*(90-СТРОКА($10:$899))%)*$J$6)+
((U8-U8*(90-СТРОКА($10:$899))%)*I8%)+
L8+
(ЕСЛИ(ИЛИ(E8>=25;H8>=200);500;ЕСЛИ((U8-U8*(90-СТРОКА($10:$899))%)*5,5%<13;13;МИН((U8-U8*(90-СТРОКА($10:$899))%)*5,5%;300))))+
((U8-U8*(90-СТРОКА($10:$899))%)*$Q$6)+
((U8-U8*(90-СТРОКА($10:$899))%)*R8)))
/(U8-U8*(90-СТРОКА($10:$899))%);(90-1-СТРОКА($10:$899))%*100)-3

(offset as number) =>
 let
  URL = "https://api-seller.ozon.ru/v2/posting/fbo/list", 
  Client_Id = Number.ToText(Excel.CurrentWorkbook(){[Name = "Client_Id"]}[Content]{0}[Column1]), 
  API_Key = Excel.CurrentWorkbook(){[Name = "API_Key"]}[Content]{0}[Column1], 
  from = Excel.CurrentWorkbook(){[Name = "frooom"]}[Content]{0}[Column1], 
  to = Excel.CurrentWorkbook(){[Name = "tooo"]}[Content]{0}[Column1], 
  Headers = [#"Content-Type" = "application/json", #"Client-Id" = Client_Id, #"Api-Key" = API_Key], 
  Body = "{""dir"":""ASC"",""filter"":{""since"":"""&from&"T00:00:00.000Z"",""status"":"""",""to"":"""&to&"T23:59:00.000Z""},""limit"":1000,""offset"":"&Number.ToText(offset)&",""translit"":true,""with"":{""analytics_data"":true,""financial_data"": false}}", 
  Response = Function.InvokeAfter(() => Json.Document(Web.Contents(URL, [Content = Text.ToBinary(Body), Headers = Headers])),#duration(0, 0, 0, 0.2))[result], 
  ToTable = Table.FromRecords(Response)
 in
  ToTable

let
 Source = List.Generate(() => 
[Result = try GetOrders(0) otherwise null, page = 0], 
each [Result] <> null, 
each [Result = try GetOrders([page] + 1000) otherwise null, page = [page] + 1000], 
each [Result]), 
 Table = Table.Buffer(Table.Combine(Source))
in
Table