let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    ChangedType = Table.TransformColumnTypes(Source,{{"Date/Time", type datetime}}),
    SortedRows = Table.Sort(ChangedType,{{"Имя", Order.Ascending}, {"Date/Time", Order.Ascending}}),
    AddedIndex = Table.AddIndexColumn(SortedRows, "Индекс", 0, 1),
    AddedCustom = Table.AddColumn(AddedIndex, "переход", each if [State] = "НЕАКТ" then [Индекс] else null),
    FilledUp = Table.FillUp(AddedCustom,{"переход"}),
    GroupedRows = Table.Group(
        FilledUp, 
        {"переход", "Имя"}, 
        {{"min_act", each List.Min(Table.SelectRows(_, each [State] = "АКТ")[#"Date/Time"]), type nullable datetime}, 
         {"non_act", each Table.SelectRows(_, each [State] = "НЕАКТ")[#"Date/Time"]{0}?, type nullable datetime }}
    )
in
    GroupedRows

let
    #"HTML Code" = Text.FromBinary(Web.Contents("https://gko.yanao.ru/activity/7705/?nav-documents=page-1")),
    #"Imported Text" = Lines.FromText(#"HTML Code"),
    #"Converted to Table" = Table.FromList(#"Imported Text", Splitter.SplitByNothing(), null, null, ExtraValues.Error),
    #"Filtered Rows" = Table.SelectRows(#"Converted to Table", each Text.Contains([Column1], "/upload/uf/")),
    #"Extracted Text Between Delimiters" = Table.TransformColumns(#"Filtered Rows", {{"Column1", each "https://gko.yanao.ru/" & Text.BetweenDelimiters(_, "href=""", """>"), type text}}),
    #"Added Custom" = Table.AddColumn(#"Extracted Text Between Delimiters", "Custom", each Excel.Workbook(Web.Contents([Column1])))
in
    #"Added Custom"

Table.TransformColumns(#"Строки с примененным фильтром", {{"Data", each List.PositionOf(_[Column1], "Проект"), type number}})

Table.TransformColumns(#"Строки с примененным фильтром", {{"Data", each Table.PromoteHeaders( Table.Skip(_, each [Column1]<>"Проект") ), type table}})

kK = 
var cur = SUM('powBI vFactSaleCurAndPrevYr'[Выручка])
var prev =  SUM('powBI vFactSaleCurAndPrevYr'[ВыручкаПредыдГод])
return
IF( prev <> 0, 1 - DIVIDE( cur, prev ) )

let
    Source = Table.FromColumns( {{"а","а","б","б"},{1,2,3,7},{4,5,6,9}}),
    Grouped = Table.Group(Source, {"Column1"}, {{"таб", each Table.FromRows(Table.ToRows(_) & {{[Column1]{0} & " итог",List.Sum([Column2]),List.Sum([Column3])}}), type table }}),
    Out = Table.Combine(Grouped[таб])
in
    Out