Fill down and remove unnecessary rows

[yevhen]

Hi everyone. I have a data structure like this. The goal is to fill down Datae column with months (yellow rows) and than remove these rows. Thanks in advance.

 

[AlienSx]

let
    Source = Excel.CurrentWorkbook(){[Name="your_table"]}[Content], 
    group = Table.Group(Source, "Date", {"Info", (x) => Table.Skip(x)[Info]}, GroupKind.Local, (s, c) => Number.From(c is text)),
    xpand = Table.ExpandListColumn(group, "Info")
in
    xpand

 

[Automatrix]

UI-based solution:

let
    Source = Excel.CurrentWorkbook(){[Name="your_table"]}[Content],
    #"Duplicated Column" = Table.DuplicateColumn(Source, "Date", "Date - Copy"),
    #"Changed Type" = Table.TransformColumnTypes(#"Duplicated Column",{{"Date - Copy", Int64.Type}}),
    #"Replaced Errors" = Table.ReplaceErrorValues(#"Changed Type", {{"Date - Copy", 99}}),
    #"Added Conditional Column" = Table.AddColumn(#"Replaced Errors", "Month", each if [#"Date - Copy"] = 99 then [Date] else null),
    #"Filled Down" = Table.FillDown(#"Added Conditional Column",{"Month"}),
    #"Filtered Rows" = Table.SelectRows(#"Filled Down", each [#"Date - Copy"] <> 99),
    #"Removed Columns" = Table.RemoveColumns(#"Filtered Rows",{"Date - Copy"})
in
    #"Removed Columns"