Dosyada her değişiklik yapıldığında otomatik olarak kriterlere göre sıralama

[josebrio]

Merhaba,

ÖRNEK:
----------------------------------------------------------------

Yer Adı SOYADI Tarih
---------- ------------ -------------
İSTANBUL Ali BOZKURT 25.02.2010

Excel'de yukarıdaki gibi bir cetvelde her yeni kayıt girildiğinde ya da herhangi bir değişiklik yapıldığında, önce tarihe göre sonra Yer adına göre otomatik olarak sıralama yapacak makro ya da formül konusunda acilen yardımlarınızı bekliyorum arkadaşlar.

Şimdiden teşekkürler...


NOT: Başka sütunlarda var ama baz alıncak kriterler önce tarih sonra yer olacak diğer sütunları zaten otomatik bunlar değişince değiştireceği için yazmadım.

 

[uzmanamele]

merhaba

örnek dosya ekleyiniz

 

[uzmanamele]

merhaba

bu kod işinizi görür mü?
ilgili sayfanın kod bölümüne yazarak deneyiniz

Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Son
If Intersect(Target, [D:D]) Is Nothing Then Exit Sub
sonsat = Cells(65536, 4).End(3).Row
If sonsat < 2 Then Exit Sub
Range(Cells(2, 1), Cells(sonsat, 4)).Sort Key1:=[D2]
Range(Cells(2, 1), Cells(sonsat, 4)).Sort Key1:=[A2]
Son:
End Sub