Her kolonu kendi içinde sıralama

[search77]

Merhaba Arkadaşlar,
Ekli dosyamda bazı başlıklarım var, bunlar neredeyse excelin son satırına kadar varlar.
Her başlığı kendi içinde küçükten büyüğe nasıl sıralayabilirim.
Macro konusunda yardımcı olabilir misiniz?
Şimdiden çok çok teşekkürler.
Saygılarımla.

 

[Muzaffer Ali]

Merhaba.
Aşağıdaki kodlar ile yapabilirsiniz.

Kodlar ilk beş kolonu sıralar.

Sub Test()
    Dim Kolon As Integer
    For Kolon = 1 To 5
        Columns(Kolon).Sort Key1:=Cells(1, Kolon), order1:=xlAscending, Header:=xlYes
    Next
End Sub

 

[search77]

sayın dalgalikur,
Elinize kolunuza emeğinize sağlık
10 numara olmuş
Syg.