Changing values in column using macros

[Dkeller12]

I have a column of data that contains 100's of numbers from 1 to 5. When I sort these ascending, I basically have 111111222222333333444444555555 with each number in it's own cell. What I need, if possible, is a macro that searches this column and leaves the 1's alone, when it gets to the 2's it changes the first 2 it finds to a 1 and leaves the next 2 as a 2. Then when it hits the 3's, it changes the first 3 to a 1, the second 3 to a 2 and the next 3 stays a three. This continues through the column until I basically have the following: 111111121212123123

Or basically:

From 111111222222333333444444445555555555
To 111111121212123123123412341234512345

Hopefully there is a way to do this and would appreciate any help that I can get.

Thanks in advance!