let
Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
#"Changed Type" = Table.TransformColumnTypes(Source,{{"Serial No", Int64.Type}, {"Emp Code", Int64.Type}, {"Emp Name", type text}, {"Leave from", type date}, {"Leave to", type date}, {"No of Leaves", Int64.Type}, {"Type of Leave", type text}}),
#"Added Custom" = Table.AddColumn(#"Changed Type", "List", each List.Dates([Leave from],[No of Leaves],#duration(1,0,0,0))),
#"Expanded List" = Table.ExpandListColumn(#"Added Custom", "List"),
#"Removed Other Columns" = Table.SelectColumns(#"Expanded List",{"Emp Code", "Emp Name", "Type of Leave", "List"}),
#"Added Index" = Table.AddIndexColumn(#"Removed Other Columns", "SN", 1, 1, Int64.Type),
#"Changed Type1" = Table.TransformColumnTypes(#"Added Index",{{"List", type date}}),
#"Reordered Columns" = Table.ReorderColumns(#"Changed Type1",{"SN", "Emp Code", "Emp Name", "List", "Type of Leave"})
in
#"Reordered Columns"