macro to put numbers in random order

[miles44]

I need a macro that will put a column of 40 numbers in random order

1
2
3
4
5
6

to

3
6
1
3
5
4