Return Unique Items based on Count ans descending

Hello,

I am trying to return the unique value from a columns on Sheet1 and sort the unique list based on the count of the items in the column from largest to smallest. I am wanting to put the unique values on Sheet2 A1. Also I only want the top 5 uniques value and in cell A6 on sheet2 have other. I want this generated automatically using VBA.

Thanks for any help you can provide.

Attach a sample workbook. Make sure there is just enough data to demonstrate your need. Include a BEFORE sheet and an AFTER sheet in the workbook if needed to show the process you're trying to complete or automate. Make sure your desired results are shown, mock them up manually if necessary.

Remember to desensitize the data.

Click on GO ADVANCED and use the paperclip icon to open the upload window.

View Pic

Here you go.

Book2.xlsx