TRICKY - Move cell up in certain columns

There isn't a nice button in the ribbon to do this, so I go into the Advanced Editor to write the step needed.

 

Here's what the M code for that particular step look like (my StackOverflow answer):

Table.FromColumns(
    List.Transform(
        Table.ToColumns(#"Prev Step"),
        List.RemoveNulls
    ),
    Table.ColumnNames(#"Prev Step")
)

 

Now since you had "Null" instead of null in the file you shared, I had to add a step to replace those before doing the above-mentioned step.

 

Here's the whole query:

let
    Source = Table.FromRows(Json.Document(Binary.Decompress(Binary.FromText("i45WMlTSUfLKz8gDUn6lOTloVKxOtJIRSEVibmoxbiXGQE5wYi5uBSZATkgmHgWmYEvwWGEG5HjjM8EcyPFJLErErQJVGOStcF8gYWCoD0RGBkaGWFSB3BUMU2WKSxXIbtdwqCoTXKosDEGe8IuEqrPAqQ6uylgfiHC5DOQBZ0cfqGnmuNShKoNZGgsA", BinaryEncoding.Base64), Compression.Deflate)), let _t = ((type nullable text) meta [Serialized.Text = true]) in type table [ID = _t, Name = _t, Profit = _t, State = _t, Date = _t]),
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"ID", type text}, {"Name", type text}, {"Profit", type text}, {"State", type text}, {"Date", type text}}),
    #"Replaced Value" = Table.ReplaceValue(#"Changed Type","Null",null,Replacer.ReplaceValue,{"ID", "Name", "Profit", "State", "Date"}),
    RemoveNulls = Table.FromColumns(List.Transform(Table.ToColumns(#"Replaced Value"), List.RemoveNulls), Table.ColumnNames(#"Replaced Value"))
in
    RemoveNulls