Sorting VBA Issues

I have some vba set up from Macros
I have many values to the right and then a column which pulls the data depending on drop downs. The problem arises when I try and sort, either manually or with vba. 0's appear above 90 and then their are random pieces of data that is not sorted.

I have formatted all values as numbers.


Where am I going wrong ?

Any help greatly appreciated

Hi

Can you please upload a samplle of the spreadsheet.

Thanks