let
Times = List.Times(#time(0, 0, 0), 1440, #duration(0, 0, 1, 0)),
ToTable = Table.FromList(Times, Splitter.SplitByNothing(), {"Time"}),
ChangedType = Table.TransformColumnTypes(ToTable, {{"Time", type time}}),
AddedHour = Table.AddColumn(ChangedType, "Hour", each Time.Hour([Time]), Int64.Type),
AddedMinute = Table.AddColumn(AddedHour, "Minute", each Time.Minute([Time]), Int64.Type),
AddedHourBucket = Table.AddColumn(AddedMinute, "HourBucket", each Text.PadStart(Text.From([Hour]), 2, "0") & ":00", type text)
in
AddedHourBucket