let
Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
#"Changed Type" = Table.TransformColumnTypes(Source,{{"Trip ID", type text}, {"Trip Timing", type time, {"hh:mm"}}, {"Bus Driver ID",type text}, {"Bus No.", type text}, {"Bus Assistant ID", type text}}),
#"Added Index" = Table.AddIndexColumn(#"Changed Type", "Index", 0, 1),
#"Added Custom" = Table.AddColumn(#"Added Index", "First or Second Trip", each if [Index]=0 or #"Added Index"{[Index]}[#"Bus No."]<>#"Added Index"{[Index]-1}[#"Bus No."] then "First" else "Second"),
#"Pivoted Column" = Table.Pivot(#"Added Custom", List.Distinct(#"Added Custom"[#"First or Second Trip"]), "First or Second Trip", "Trip ID"),
#"Added Custom1" = Table.AddColumn(#"Pivoted Column", "First Bus ***", each if [First] <> null then [Bus Assistant ID] else null),
#"Added Custom2" = Table.AddColumn(#"Added Custom1", "Second Bus ***", each if [Second] <> null then [Bus Assistant ID] else null),
#"Sorted Rows" = Table.Sort(#"Added Custom2",{{"Bus Driver ID", Order.Ascending}, {"Trip Timing", Order.Ascending}}),
#"Reordered Columns" = Table.ReorderColumns(#"Sorted Rows",{"Bus Driver ID", "Bus No.", "First", "Second Bus ***", "Second", "First Bus ***"}),
#"Added Custom3" = Table.AddColumn(#"Reordered Columns", "Second Trip ID", each if #"Reordered Columns"{[Index]+1}[Second]<>null then #"Reordered Columns"{[Index]+1}[Second] else ""),
#"Added Custom4" = Table.AddColumn(#"Added Custom3", "Second Bus Assistant", each if #"Reordered Columns"{[Index]+1}[Second Bus ***]<>null then #"Reordered Columns"{[Index]+1}[Second Bus ***] else ""),
#"Filtered Rows" = Table.SelectRows(#"Added Custom4", each ([First Bus ***] <> null)),
#"Removed Columns" = Table.RemoveColumns(#"Filtered Rows",{"Trip Timing", "Second Bus ***", "Second"}),
#"Renamed Columns" = Table.RenameColumns(#"Removed Columns",{{"First", "First Trip ID"}, {"First Bus ***", "First Bus Assistant"}}),
#"Removed Columns1" = Table.RemoveColumns(#"Renamed Columns",{"Index", "Bus Assistant ID"})
in
#"Removed Columns1"