Otomatik Sıralama

[mrkync]

Arkadaşlar merhaba
Kendi çapımda küçük bir excel sayfayı düzenledim. Ancak verileri otomatik olarak sıralayamıyorum. Ekte verdiğim dosyada sayfa numaraları değişmeyecek şekilde köy ismi ve uygulama şekline göre sıralamak istiyorum. Sitedeki sıralama kodlarını girdim ancak verileri userformla girdiğim için bu seferde sıralama yaptıramadım. İstediğim şey öncelikle yeni kayıt a tıklayarak veri kaydetmek ki burada sorun yok kaydedilen veriyi köy ismi ve uygulama şekline göre gruplandırmak istiyorum. Lütfen yardım...

 

[Orion1]

Kırmızı satır ekleyip deneyiniz.

End If
[B][COLOR="Red"]sat = Cells(Rows.Count, "B").End(xlUp).Row
Range("A2:K" & sat).Sort key1:=Range("C2"), key2:=Range("J2")[/COLOR][/B]