let

csv=List.NonNullCount(List.Distinct(Excel.CurrentWorkbook(){[Name="ТабФильтрCSV"]}[Content][CSV]))>0,//переключатель какой запрос использовать
Sales="N:\Home\Sbit\PP\!Public\ОТЧЕТЫ\Отчетность А24\Base\PQ\Sales.txt",//запрос1
SalesCSV="N:\Home\Sbit\PP\!Public\ОТЧЕТЫ\Отчетность А24\Base\PQ\SalesCSV.txt",//запрос2
    Source = Text.FromBinary(File.Contents(if csv then SalesCSV else Sales),1251),//выбор запроса
    #"Преобразовано в таблицу" = #table(1, {{Source}}),
    #"Замененное значение" = Table.ReplaceValue(#"Преобразовано в таблицу","Директория=""N:\Home\Sbit\PP\!Public\ОТЧЕТЫ\Отчетность А24\Base"",","Директория=""C:\Users\VNaidyuk\Documents\base"",",Replacer.ReplaceText,{"Column1"}),//замена директории (через терминал работает дольше, использую терминал только для удаленки))
    Column1 = if Excel.CurrentWorkbook(){[Name="Таблица6"]}[Content]{0}[Терминал]=null then #"Замененное значение"{0}[Column1] else Source
in
    Column1

let
_1=Expression.Evaluate(ПОДКЛЮЧЕНИЕ,#shared)
in
_1