Alfabetik sıra ile dilebilirmi

[stres]

Arkadaşlar ekteki dosya ya bir bakıp yardımcı olursanız minnettar kalırım

 

[Necdet]

Merhaba,

Aşağıdaki kodları sayfanın kod bölümüne kopyalayınız.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [F:F]) Is Nothing Then Exit Sub
SonSatır = [A65536].End(3).Row
Range("A2:F" & SonSatır).Sort key1:=[A1]
End Sub

 

[hamitcan]

Eki inceleyin. A1 ile F1 arasındaki başlıkları seçtiğinizde, o sütuna göre sıralama yapacaktır.

 

[stres]

eline sağlık necdet ama ben biraz eksik yazmışım kusura bakma dosyayı yeniden gönderiyorum bir bakarsan memnun kalırım

 

[stres]

Eki inceleyin. A1 ile F1 arasındaki başlıkları seçtiğinizde, o sütuna göre sıralama yapacaktır.

ilgin için teşekküler senin yaptığında güzel ama benim sorunumu necdetin yaptığı çözdü ama ben eksik isemd ebulunmuştum yeniden yolladım dosyayı

 

[stres]

Açılır menüde seçim yapma

ekte açıklamsı olan dosyaya bir bakarsanız fena olmaz