Sort many columns independently, at once?

[Vincent Fatica]

I have 75 columns of data. I want to sort each column (highest to
lowest) independent of the other columns, at once. How can I do that?
Example: I want

3 2 1
1 1 3
2 3 2

to become

3 3 3
2 2 2
1 1 1

Thank you.

- Vince

 

[Bernie Deitrick]

Vincent,

The easiest is a macro:

Sub Sort75()
Dim i As Integer
For i = 1 To 75Cells(1, i).EntireColumn.Sort Cells(1, i), xlDescending
Next i
End Sub

HTH,
Bernie
MS Excel MVP