You are welcome.

Since you don't show your existing code, I can't help about it.

But the idea will be like this :

>>> Sheet1 is continuously updated with new numbers on a loop basis (until the last row on the sheet it filled)
Your existing code should do this

>>> Once an entire column of numbers in generated, it is moved to sheet2 where another code (hopefully your one), sorts and removes duplicates.
Your existing code should do this (move data from Sheet1 to Sheet2)
Then after your code has done the moving process, call my Sub.

>>> After this process is complete, the data then moves to sheet3 (in the next available row)
In my Sub, the output is place on range H1 around by this line of code :
skipper:
    .Offset(, 7).Value = arr1
Your code should locate next available cell on Sheet3 (let say its name is TargetCell), then change the code above to this :
skipper:
    TargetCell.Resize(UBound(arr1,1),UBound(arr1,2)).Value = arr1
>>> where another code is run to order the data from smallest to largest.
Your existing code should do this.