Excel'de satırları nasıl ters çeviririm?

Diyelim ki 1 sütunum var, örneğin:

1
2
3
4
5

Sütunun olmasını istiyorum

5
4
3
2
1

Açıkçası, sütunlar bu kadar basit değil, yine de aynı olmalı.

PS: Bu forumda sütun oluşturamıyorum. Bir satır olarak gösterir.

Sadece bir sütundaki herhangi bir hücreye ve bu küçük makroya tıklayın:

Option Explicit

Sub FlipColumn()
   Dim cl As Long, N As Long, i As Long
   cl = ActiveCell.Column
   N = Cells(Rows.Count, cl).End(xlUp).Row
   ReDim ary(1 To N) As Variant

   For i = 1 To N
      ary(i) = Cells(i, cl).Value
   Next i

   For i = 1 To N
      Cells(i, cl).Value = ary(N - i + 1)
   Next i
End Sub

sütun içeriğini tersine çevirir.

Orijinal siparişin "sıralı" niteliğine dayanmaz.

Verileri vurgulayın ve sonra sıralayın Highest to lowest.

Sonuç