// Prices
let
    Источник = Excel.CurrentWorkbook(){[Name="Таблица2"]}[Content],
    #"Измененный тип" = Table.TransformColumnTypes(Источник,{{"Дата", type date}, {"Актив1", Int64.Type}, {"Актив2", Int64.Type}}),
    #"Другие столбцы с отмененным свертыванием" = Table.UnpivotOtherColumns(#"Измененный тип", {"Дата"}, "Атрибут", "Значение"),
    #"Переименованные столбцы" = Table.RenameColumns(#"Другие столбцы с отмененным свертыванием",{{"Атрибут", "Актив"}, {"Значение", "Цена"}})
in
    #"Переименованные столбцы"

// Deals
let
    Источник = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    #"Измененный тип" = Table.TransformColumnTypes(Источник,{{"Дата", type date}, {"Актив", type text}, {"Вид операции", type text}, {"Количество", Int64.Type}}),
    #"Added Custom" = Table.AddColumn(#"Измененный тип", "Движение", each if [Вид операции]="Продажа" then -1*[Количество] else [Количество], type number)
in
    #"Added Custom"

// Assets
let
    #"Merged Queries" = Table.NestedJoin(Prices,{"Дата", "Актив"},Deals,{"Дата", "Актив"},"NewColumn",JoinKind.LeftOuter),
    Exp = Table.ExpandTableColumn(#"Merged Queries", "NewColumn", {"Движение"}, {"Движение"}),
    #"Added Custom" = Table.AddColumn(Exp, "Количество", each List.Sum(Table.SelectRows(Exp, (r)=>r[Актив]=[Актив] and r[Дата]<=[Дата])[Движение]), type number),
    #"Removed Columns" = Table.RemoveColumns(#"Added Custom",{"Движение"}),
    #"Filtered Rows" = Table.SelectRows(#"Removed Columns", each ([Количество] <> null and [Количество] <> 0)),
    #"Added Custom1" = Table.AddColumn(#"Filtered Rows", "Сумма", each [Цена]*[Количество], type number)
in
    #"Added Custom1"

List.Sum(Table.SelectRows(Exp, (r)=>r[Актив]=[Актив] and r[Дата]<=[Дата])[Движение])

Table.MaxN(workHistory, each _[Дата] <= #date(2016, 11, 11) and _[ИмяАктива] = "Актив1", 1){0}[Цена]