Добрый день есть сводный отчет Power Query ,выгружает в сводный отчет данные из файлов,расположенных папке "данные для отчета".Сводный отчет выгружает список матчей и коэффициенты к каждому матчу.Мне нужно обновить код так чтобы дополнительно в сводный отчет начали выгружаться данные в числовом формате из столбцов SK,SL,SM из файлов расположенных в папке "данные для отчета". Помогите пжлста
Добрый день есть сводный отчет Power Query ,выгружает в сводный отчет данные из файлов,расположенных папке "данные для отчета".Сводный отчет выгружает список матчей и коэффициенты к каждому матчу.Мне нужно обновить код так чтобы дополнительно в сводный отчет начали выгружаться данные в числовом формате из столбцов SK,SL,SM из файлов расположенных в папке "данные для отчета". Помогите пжлстаmailvv2020
хотя вроде там несложно, но видимо мы чего-то не знаем... [vba]
Код
let f=(x)=>[a=Excel.Workbook(x,false){[Item="1x2"]}[Data], b=List.Buffer(Table.ColumnNames(a)), c=List.Difference(List.Transform(List.PositionOf(Record.ToList(a{1}),null,Occurrence.All,(c,v)=>c<>v),(x)=>b{x}),List.FirstN(List.LastN(b,8),4)), d=Table.FirstN(Table.SelectColumns(Table.Skip(a,2),c),(x)=>x[Column1]<>null), e=List.Zip({Table.ColumnNames(d),{"date", "home", "guest"}&List.TransformMany(List.RemoveNulls(List.Distinct(Record.ToList(a{0}))),(x)=>{"1","X","2"},(x,y)=>x&y)&{"X1","X2","X3"}}), f=Table.RenameColumns(d,e)][f],
from = Folder.Files("C:\путь\dannye_dlja_otcheta"), slct = Table.SelectRows(from,(x)=>x[Extension]=".xlsx")[[Name], [Content]], tr = Table.Buffer(Table.TransformColumns(slct,{"Content",f})), nm = List.Distinct(List.Combine(List.Transform(tr[Content],Table.ColumnNames))), to = Table.ExpandTableColumn(tr,"Content",nm) in to
хотя вроде там несложно, но видимо мы чего-то не знаем... [vba]
Код
let f=(x)=>[a=Excel.Workbook(x,false){[Item="1x2"]}[Data], b=List.Buffer(Table.ColumnNames(a)), c=List.Difference(List.Transform(List.PositionOf(Record.ToList(a{1}),null,Occurrence.All,(c,v)=>c<>v),(x)=>b{x}),List.FirstN(List.LastN(b,8),4)), d=Table.FirstN(Table.SelectColumns(Table.Skip(a,2),c),(x)=>x[Column1]<>null), e=List.Zip({Table.ColumnNames(d),{"date", "home", "guest"}&List.TransformMany(List.RemoveNulls(List.Distinct(Record.ToList(a{0}))),(x)=>{"1","X","2"},(x,y)=>x&y)&{"X1","X2","X3"}}), f=Table.RenameColumns(d,e)][f],
from = Folder.Files("C:\путь\dannye_dlja_otcheta"), slct = Table.SelectRows(from,(x)=>x[Extension]=".xlsx")[[Name], [Content]], tr = Table.Buffer(Table.TransformColumns(slct,{"Content",f})), nm = List.Distinct(List.Combine(List.Transform(tr[Content],Table.ColumnNames))), to = Table.ExpandTableColumn(tr,"Content",nm) in to
let f=(x)=>[a=Excel.Workbook(x,false){[Item="1x2"]}[Data], b=List.Buffer(Table.ColumnNames(a)), c=List.Difference(List.Transform(List.PositionOf(Record.ToList(a{1}),null,Occurrence.All,(c,v)=>c<>v),(x)=>b{x}),List.FirstN(List.LastN(b,8),4)), d=Table.FirstN(Table.SelectColumns(Table.Skip(a,2),c),(x)=>x[Column1]<>null), e=List.Zip({Table.ColumnNames(d),{"date", "home", "guest"}&List.TransformMany(List.RemoveNulls(List.Distinct(Record.ToList(a{0}))),(x)=>{"1","X","2"},(x,y)=>x&y)&{"X1","X2","X3"}}), f=Table.RenameColumns(d,e)][f],
from = Folder.Files("C:\путь\dannye_dlja_otcheta"), slct = Table.SelectRows(from,(x)=>x[Extension]=".xlsx")[[Name], [Content]], tr = Table.Buffer(Table.TransformColumns(slct,{"Content",f})), nm = List.Distinct(List.Combine(List.Transform(tr[Content],Table.ColumnNames))), to = Table.ExpandTableColumn(tr,"Content",nm) in to
спасибо большое,что надо указать в коде чтобы столбцы SK,SL,SM были расположены в самом конце отчета справа.И если мне надо чтобы не все коэффициенты букмекеров выгружались,а только определенных,где в коде указать их имена?
let f=(x)=>[a=Excel.Workbook(x,false){[Item="1x2"]}[Data], b=List.Buffer(Table.ColumnNames(a)), c=List.Difference(List.Transform(List.PositionOf(Record.ToList(a{1}),null,Occurrence.All,(c,v)=>c<>v),(x)=>b{x}),List.FirstN(List.LastN(b,8),4)), d=Table.FirstN(Table.SelectColumns(Table.Skip(a,2),c),(x)=>x[Column1]<>null), e=List.Zip({Table.ColumnNames(d),{"date", "home", "guest"}&List.TransformMany(List.RemoveNulls(List.Distinct(Record.ToList(a{0}))),(x)=>{"1","X","2"},(x,y)=>x&y)&{"X1","X2","X3"}}), f=Table.RenameColumns(d,e)][f],
from = Folder.Files("C:\путь\dannye_dlja_otcheta"), slct = Table.SelectRows(from,(x)=>x[Extension]=".xlsx")[[Name], [Content]], tr = Table.Buffer(Table.TransformColumns(slct,{"Content",f})), nm = List.Distinct(List.Combine(List.Transform(tr[Content],Table.ColumnNames))), to = Table.ExpandTableColumn(tr,"Content",nm) in to
спасибо большое,что надо указать в коде чтобы столбцы SK,SL,SM были расположены в самом конце отчета справа.И если мне надо чтобы не все коэффициенты букмекеров выгружались,а только определенных,где в коде указать их имена?mailvv2020
а глобально - я бы на вашем месте всё-таки попытался бы разобраться в работе кода - с ноября прошлого года вопрос висит - за это время всю спецификацию языка можно было пару раз прочитать или курс какой пройти
а глобально - я бы на вашем месте всё-таки попытался бы разобраться в работе кода - с ноября прошлого года вопрос висит - за это время всю спецификацию языка можно было пару раз прочитать или курс какой пройтиmuzykinmikhail
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
