filter unique values and sort A to Z Excel VBA

Question

I have been using below code to Filter the Unique values from Sheet1 and paste them into Sheet2 my code is working fine. But it has one issue that is w