Combination Data Sorting Macro

I have two columns, left is called OD right is called ID. In each OD there are multiple ID's but this is shown for example as:

OD-----------ID
254000----0
254000----127000
285750----0
285750----127000
285750----158750
304800----0
304800----127000

Therefore, showing duplicates for the OD. The required format is:

254000---0---127000
285750---0---127000---158750
304800---0---127000

This shows each OD in the first column (no duplicates) and the corresponding ID's in the columns on the right. The example is done with small amount of numbers however, the data I am working with consists of thousands of rows therefore is not practical to do by hand. Please see attached spread sheet for example template with both unsorted and sorted data shown.

I attempted to do this by using the following code:

[Code] .....

Attached File : testing.xlsx