No Solution on simple VBA code to Sort Data on a hidden worksheet

Question

This is my code, here is the problem

1. N column must sort Largest to Smallest
2. P Column must sort Z to A
3. Row 3 is where the headers are at, Rows