Добрый день всем участникам форума! Подскажите, пожалуйста, как подправить код PQ в одной задачке. Объединяю файл. Структура таблиц одинакова, НО до таблицы разное количество строк. До разворота таблиц (столбец [Data]) я удаляю верхние несколько строк и делаю первую строку заголовком сведенной таблицы. Можно ли каким-нибудь образом удалить лишнюю строку в первом столбце ячейки которой содержится слов "РБЕ"?. Просьба еще одна. Подскажите, пожалуйста, как извлечь содержимое этой ячейки которая потом удаляется (из первого вопроса). Попробовал сделать, у меня выдает результат RECORD.
Добрый день всем участникам форума! Подскажите, пожалуйста, как подправить код PQ в одной задачке. Объединяю файл. Структура таблиц одинакова, НО до таблицы разное количество строк. До разворота таблиц (столбец [Data]) я удаляю верхние несколько строк и делаю первую строку заголовком сведенной таблицы. Можно ли каким-нибудь образом удалить лишнюю строку в первом столбце ячейки которой содержится слов "РБЕ"?. Просьба еще одна. Подскажите, пожалуйста, как извлечь содержимое этой ячейки которая потом удаляется (из первого вопроса). Попробовал сделать, у меня выдает результат RECORD.Anis625
let f=(x)=>[a = Excel.Workbook(x){0}[Data], b = Table.PromoteHeaders(Table.Skip(a, each [Column2]=null)), c = a{1}[Column1], d = if Text.Contains(c,"РБЕ") then c else null, e = [название = a{0}[Column1], РБЕ = d, tmp=b]][e], from = Folder.Files(Excel.CurrentWorkbook(){[Name="Papka"]}[Content]{0}[Путь к папке])[Content], trnsf = Table.FromRecords(List.Transform(from,f)), to = Table.ExpandTableColumn(trnsf, "tmp", {"Показатели", "План", "Факт", "Откл"}) in to
[/vba]
или так - чутка короче, суть та же
[vba]
Код
let f=(x)=>[a = Excel.Workbook(x){0}[Data], b = [ название = a{0}[Column1], РБЕ = [c = a{1}[Column1],d = if Text.Contains(c,"РБЕ") then c else null][d], tmp =Table.PromoteHeaders(Table.Skip(a, each [Column2]=null))]][b],
from = Folder.Files(Excel.CurrentWorkbook(){[Name="Papka"]}[Content]{0}[Путь к папке])[Content], trnsf = Table.FromRecords(List.Transform(from,f)), to = Table.ExpandTableColumn(trnsf, "tmp", {"Показатели", "План", "Факт", "Откл"}) in to
[/vba]
как-то всё сложно у вас...
[vba]
Код
let f=(x)=>[a = Excel.Workbook(x){0}[Data], b = Table.PromoteHeaders(Table.Skip(a, each [Column2]=null)), c = a{1}[Column1], d = if Text.Contains(c,"РБЕ") then c else null, e = [название = a{0}[Column1], РБЕ = d, tmp=b]][e], from = Folder.Files(Excel.CurrentWorkbook(){[Name="Papka"]}[Content]{0}[Путь к папке])[Content], trnsf = Table.FromRecords(List.Transform(from,f)), to = Table.ExpandTableColumn(trnsf, "tmp", {"Показатели", "План", "Факт", "Откл"}) in to
[/vba]
или так - чутка короче, суть та же
[vba]
Код
let f=(x)=>[a = Excel.Workbook(x){0}[Data], b = [ название = a{0}[Column1], РБЕ = [c = a{1}[Column1],d = if Text.Contains(c,"РБЕ") then c else null][d], tmp =Table.PromoteHeaders(Table.Skip(a, each [Column2]=null))]][b],
from = Folder.Files(Excel.CurrentWorkbook(){[Name="Papka"]}[Content]{0}[Путь к папке])[Content], trnsf = Table.FromRecords(List.Transform(from,f)), to = Table.ExpandTableColumn(trnsf, "tmp", {"Показатели", "План", "Факт", "Откл"}) in to
Pelena, прохожий2019, Прошу прощение за то, что не написал, по коду. По личным причинам, получилось только в эти дни сесть за компьютер. Спасибо Вам огромное за помощь.
Pelena, прохожий2019, Прошу прощение за то, что не написал, по коду. По личным причинам, получилось только в эти дни сесть за компьютер. Спасибо Вам огромное за помощь.Anis625