let

    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],

    Custom1 = Table.Profile(Source),

    #"Added Custom" = Table.AddColumn(Custom1, "Custom", each [Count]=[NullCount]),

    #"Filtered Rows" = Table.SelectRows(#"Added Custom", each ([Custom] = true)),

    Custom2 = Table.RemoveColumns(Source,#"Filtered Rows"[Column])

in

    Custom2