(a,b)=> Number.From( b[Name] = "BR" )

=ЕСЛИОШИБКА(ИНДЕКС(Таблица1[Начало];АГРЕГАТ(15;6;СТРОКА(Таблица1[[Название ]])/(Таблица1[[Название ]:[Название ]]=$G$6);СТРОКА(A1))-4);"")

let
    Source = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    #"Added Index1" = Table.AddIndexColumn(Source, "Индекс", 0, 1),
    #"Grouped Rows" = Table.Group(#"Added Index1", {"Индекс"}, {{"temp", each _, type table}})[[temp]][[temp]],
    #"Added Custom" = Table.AddColumn(#"Grouped Rows", "temp2", each [#"Added Custom" = Table.AddColumn([temp], "a", each Record.FieldValues(_)),
    #"Changed Type" = Table.TransformColumns(#"Added Custom",{{"a", each List.Transform(_,  each Text.Split(Text.From(_),"#(lf)"))}})[[a]],
    #"Added Index" = Table.AddIndexColumn(#"Changed Type", "Индекс", 0, 1),
    #"Expanded {0}" = Table.ExpandListColumn(#"Added Index", "a"),
    #"Added Index2" = Table.AddIndexColumn(#"Expanded {0}", "Индекс.1", 1, 1),
    #"Expanded {0}1" = Table.ExpandListColumn(#"Added Index2", "a"),
    #"Duplicated Column" = Table.DuplicateColumn(#"Expanded {0}1", "a", "a1"),
    #"Split Column by Delimiter" = Table.SplitColumn(#"Duplicated Column", "a1", Splitter.SplitTextByEachDelimiter({". "}, QuoteStyle.Csv, false), {"a.1", "a.2"}),
    #"Split Column by Delimiter1" = Table.ExpandListColumn(Table.TransformColumns(#"Split Column by Delimiter", {{"a.1", Splitter.SplitTextByDelimiter(",", QuoteStyle.Csv), let itemType = (type nullable text) meta [Serialized.Text = true] in type {itemType}}}), "a.1"),
    #"Added Custom1" = Table.AddColumn(#"Split Column by Delimiter1", "Пользовательская", each try {Text.BeforeDelimiter([a.1], "-")..Text.AfterDelimiter([a.1], "-")} otherwise null),
    #"Expanded {0}2" = Table.ExpandListColumn(#"Added Custom1", "Пользовательская"),
    #"Filtered Rows" = Table.SelectRows(#"Expanded {0}2", each ([Индекс.1] <> 4)),
    #"Added Conditional Column" = Table.AddColumn(#"Filtered Rows", "a2", each if [Пользовательская] = null then try Number.From([a.1]) otherwise 1 else Number.From([Пользовательская])),
    #"Added Conditional Column1" = Table.AddColumn(#"Added Conditional Column", "a3", each if [a.2] = null then [a] else [a.2]),
    #"Removed Other Columns" = Table.SelectColumns(#"Added Conditional Column1",{"a3", "a2", "Индекс.1"}),
    #"Pivoted Column" = Table.Pivot(Table.TransformColumnTypes(#"Removed Other Columns", {{"Индекс.1", type text}}, "ru-RU"), List.Distinct(Table.TransformColumnTypes(#"Removed Other Columns", {{"Индекс.1", type text}}, "ru-RU")[Индекс.1]), "Индекс.1", "a3")]
    [#"Pivoted Column"])[[temp2]],
    #"Expanded {0}" = Table.ExpandTableColumn(#"Added Custom", "temp2", {"a2", "1", "2", "3"}, {"a2", "1", "2", "3"}),
    #"Changed Type" = Table.TransformColumnTypes(#"Expanded {0}",{{"3", type datetime}}),
    #"Changed Type1" = Table.TransformColumnTypes(#"Changed Type",{{"3", type date}})
in
    #"Changed Type1"

=СУММЕСЛИ('Ввод данных '!$B$1:$B$133;'Ввод данных '!$B$10;ИНДЕКС('Ввод данных '!$E$1:$AE$133;;СТРОКА(A1)*2-1))

let
    a = Table.SelectRows(Excel.CurrentWorkbook(), each Text.StartsWith([Name], "Группа"))
    in Table.UnpivotOtherColumns(Table.Combine(a[Content]),{},"b","a")[[a],[b]]

let
    Источник = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],
    Merge = Table.NestedJoin(Источник,{"Строки"},Таблица2,{"Строки 2"},"Таблица2",JoinKind.LeftOuter)
in
    Table.AddColumn(Merge, "впр", each try [Таблица2]{0}[Значния 2] otherwise null)

let
    Источник = Pdf.Tables(File.Contents("C:\abc\2018_1\2018_1.pdf")),
    #"второй шаг" = Table.SelectRows(Источник, each  Text.Contains([Name], "(Page")),
    #"Добавлен пользовательский объект1" = Table.AddColumn(#"второй шаг", "Count", each Record.FieldCount([Data]{0})),
    Условн = Table.AddColumn(#"Добавлен пользовательский объект1", "a", each if [Count] = 4 then  Table.RenameColumns(Table.CombineColumns([Data],{"Column2", "Column3"},Combiner.CombineTextByDelimiter(" ", QuoteStyle.None),"Column2"),{{"Column4", "Column3"}}) else if [Count] = 5 then  Table.RenameColumns(Table.CombineColumns([Data],{"Column2", "Column3"},Combiner.CombineTextByDelimiter(" ", QuoteStyle.None),"Column2"),{{"Column5", "Column3"}}) else if [Count] > 5 then Table.RenameColumns(Table.AddColumn([Data], "Column", each Text.Combine(Record.FieldValues(_)," "))[[Column]],{{"Column", "Column1"}}) else [Data])[[a]],
    #"Развернутый элемент a" = Table.ExpandTableColumn(Условн, "a", {"Column1", "Column2", "Column3"})
in
    #"Развернутый элемент a"

=ЕСЛИОШИБКА(ИНДЕКС(C$1:C$700;АГРЕГАТ(15;6;СТРОКА($C$1:$C$510)/ЕЧИСЛО(ПОИСК("москв";$E$1:$E$503));СТРОКА(C1)));"")