Read data and separate into different worksheets

Hi all,
I have converted the format of an input data which I will insert into the worksheet named "ProductionSchedule".

I need a macro that will read the data and create a new worksheet based on its factory number.

An example of the result that I need is in worksheet "1".

There is factory 2 and 3 in the input data. When macro is run, it will create additonal worksheets named "2" and "3" and inside it is the data which is from the input data.

Appreciate if anyone can help me solve this.
Thanks

/bump

Reply to let it post up again