Is there any way to rank the data using a macro, or is there an easier
way?

Basically I have a list of data sorted by state. I want to rank the
data from high to low(1st, 2nd, or 1,2, etc.), but not sort the data (I
want it to stay where it is with the rank to the right of the data).

How can I do this?

Thanks,

Dave