Aligning Column Headers with Column Data

Hi Anonymous,

I have a solution for you. It searches for all columns which are empty and removes them. Then shift the names of columns.

I've developed it as a function which will be easier to integrate in your solution.

let
    Source = Table.FromRows(Json.Document(Binary.Decompress(Binary.FromText("i45WSlTSUUoCYiBKBuIUIE5VitWJVjIEsowgEsZAbALEpkqxsQA=", BinaryEncoding.Base64), Compression.Deflate)), let _t = ((type text) meta [Serialized.Text = true]) in type table [Customer = _t, Product = _t, Qty = _t, Cost = _t, Sell = _t, #" " = _t]),
    
    fnShiftByOneEmptyColumn = (tbl as table) as table =>
        let
            // get column names of the origin table
            ColumnNames = Table.ColumnNames(tbl),
            // find columns which don't contain any values
            EmptyColumns = List.Select(
                ColumnNames, 
                each List.MatchesAll(Table.Column(tbl, _), each _ = null or _ = "")
            ),
            // remove empty column from the origin table
            RemoveEmptyColumn = Table.RemoveColumns(tbl, EmptyColumns),
            // rename columns
            RenameColumns = Table.RenameColumns(
                RemoveEmptyColumn, 
                List.Zip(
                    {
                        // columns of the origin table without empty columns
                        Table.ColumnNames(RemoveEmptyColumn), 
                        // N-x columns of the origin table
                        List.RemoveLastN(ColumnNames, List.Count(EmptyColumns))
                    }
                )
            )
        in
            RenameColumns,

    Result = fnShiftByOneEmptyColumn(Source)
in
    Result