Macro to sort data in descending order

Is it possible to sort two different ranges of data on seperate tabs in descending order using a macro?

I would like sort data in both tabs by order of volume while keeping all data in tact. Also I do not want to include the header or "total" row in the sort.

Please refer to the .xls file for reference.

Thanks!