buchOfficePack - fxTableRemoveEmptyColumns – удаляем пустые столбцы в таблице

#АнатомияФункций - buchOfficePack



Всем привет!

Продолжаем пилить библиотеку. Видос уже на Ютубе

Само решение уже было на канале, но поскольку надо обеспечить совместимость с 2016 пришлось отказаться от второго аргумента в Table.Profile. В итоге получилось решение в три строчки )))

fxTableRemoveEmptyColumns=[func =(table, optional options)=>

[tbl = Table.Buffer(Table.Profile(table)),

lst = Table.SelectRows(tbl,(r)=>r[Count]=r[NullCount])[Column],

to = Table.RemoveColumns(table,lst)][to],

typ=type function (table as table, optional options as record) as table meta

[Documentation.Name="fxTableRemoveEmptyColumns (@buchlotnik)",

Documentation.LongDescription="функция, удаляющая пустые столбцы из таблицы"],

result = Value.ReplaceType(func,typ)

][result]


Соответственно библиотека продолжит свое развитие, но следующее видео по данной тематике будет последним - трудоёмко и мало кому интересно.



Надеюсь, было полезно.

Всех благ!

@buchlotnik