let
Source = Excel.CurrentWorkbook(){[Name="Rng_Data"]}[Content],
TypesModifiés = Table.TransformColumnTypes(Source,{{"Column1", type date}, {"Column2", type time}, {"Column3", type time}}),
ErreursSupprimées = Table.RemoveRowsWithErrors(TypesModifiés),
LignesFiltrées = Table.SelectRows(ErreursSupprimées, each ([Column1] <> null) and ([Column2] <> null)),
ColonneAjoutée_HeureExtra = Table.AddColumn(LignesFiltrées, "HeuresExtras", each (if [Column2]<#time(6,0,0) then Duration.From(#time(6,0,0)-[Column2]) else Duration.From(0)) + (if [Column3]>#time(21,0,0) then Duration.From([Column3]-#time(21,0,0)) else Duration.From(0)), type duration),
ColonneRenommée = Table.RenameColumns(ColonneAjoutée_HeureExtra,{{"Column1", "Date"}}),
DébutDeMoisCalculé = Table.TransformColumns(ColonneRenommée,{{"Date", Date.StartOfMonth, type date}}),
LignesGroupéesParMois = Table.Group(DébutDeMoisCalculé, {"Date"}, {{"HeuresNuit", each List.Sum([HeuresExtras]), type duration}})
in
LignesGroupéesParMois