let
Источник =Folder.Files(Excel.CurrentWorkbook(){[Name="Parameters"]}[Content]{0}[Значение]& "\БАКЛАЖАН"),
#"Удаленные столбцы" =Table.RemoveColumns(Источник,{"Date accessed", "Date modified", "Date created", "Attributes", "Folder Path"}),
#"Строки с применным фильтром2" = Table.SelectRows(#"Удаленные столбцы", each Text.Contains([Extension],"xls")),
#"Добавлен пользовательский объект" =Table.AddColumn(#"Строки с применным фильтром2","Custom", each Excel.Workbook([Content])),
#"Удаленные столбцы1" =Table.RemoveColumns(#"Добавлен пользовательский объект",{"Content"}),
#"Развернутый элемент Custom" = Table.ExpandTableColumn(#"Удаленные столбцы1", "Custom", {"Name","Data", "Item", "Kind", "Hidden"}, {"Name.1", "Data", "Item", "Kind",
"Hidden"}),
#"Строки с применным фильтром3" = Table.SelectRows(#"Развернутый элемент Custom", each ([Name.1] = "TDSheet")),
#"Строки с применным фильтром1" = Table.SelectRows(#"Строки с применным фильтром3", each Text.Contains([Extension], "xls")),
#"Переупорядоченные столбцы" = Table.ReorderColumns(#"Строки с применным фильтром1",{"Name", "Extension", "Name.1", "Item", "Kind", "Hidden", "Data"}),
#"Удаленные столбцы2" = Table.RemoveColumns(#"Переупорядоченные столбцы",{"Name.1", "Item", "Kind", "Hidden"}),
#"Развернутый элемент Data" = Table.ExpandTableColumn(#"Удаленные столбцы2", "Data", {"Column1", "Column2", "Column3", "Column4", "Column5", "Column6",
"Column7", "Column8", "Column9", "Column10", "Column11", "Column12", "Column13", "Column14", "Column15", "Column16", "Column17", "Column18", "Column19",
"Column20", "Column21", "Column22", "Column23", "Column24", "Column25", "Column26", "Column27", "Column28", "Column29", "Column30", "Column31",
"Column32", "Column33"}, {"Column1", "Column2", "Column3", "Column4", "Column5", "Column6", "Column7", "Column8", "Column9", "Column10", "Column11", "Column12", "Column13",
"Column14", "Column15", "Column16", "Column17", "Column18", "Column19", "Column20", "Column21", "Column22", "Column23", "Column24", "Column25", "Column26",
"Column27", "Column28", "Column29", "Column30", "Column31", "Column32",
"Column33"}),
#"Повышенные заголовки" = Table.PromoteHeaders(#"Развернутый элемент Data"),
#"Измененный тип" = Table.TransformColumnTypes(#"Повышенные заголовки",{{"N", type text}}),
#"Строки с применным фильтром" = Table.Buffer(Table.SelectRows(#"Измененный тип", each [N] <> "N"))
in
#"Строки с применным фильтром"
|