Sayın HEZER,
Siz Kayıtlar sayfasındaki verileri mevcut kayıt sırasına göre değil alfabetik istediğiniz için,
verdiğim cevapta önce (geçici olarak) Kayıtlar sayfasını C sütununa göre alfabetik sıralatarak
verieri USERFORM'a almayı, USERFORM kapatıldığında ise Kayıtlar sayfasını tekrar A sütununa göre
sıralatmayı öngörmüştüm.
Eklediğiniz son belgeye baktığımda, Module3'teki sirala makrosunda
k.Range(alan).Sort Key1:=k.[C1], Header:=xlYes satırında kriter olarak k.[C1]'i yazmışsınız,
oysa burada kriter oarak k.[A1] yazılması gerekir.
C sütununa göre sıralama form'a ait Activate kodunda k.Range(alan).Sort Key1:=k.[C1], Header:=xlYes şeklindeki satırda var.
Özetle form açılırken C sütununu göre sıralama, kapandığında da tekrar A sütununa göre sıralama olması gerekir.
Yukarıdaki hususu düzeltirsiniz.
Bir userform aktif iken, mümkün olduğunca sayfalarda işlem yapmamak gerekir.
Bu türden sokak adeti, kişi sayısı gibi bilgiler, userform açıldığında önceden belgede kayıtlı olmalıdır.
İlk gördüğüm sokak adeti bilgisi: zaten belgenin VeriTabanı sayfasında AR-AS sütununda bu bilgi yok mu?
Bu bilgi için orası üzerinden sokak sayısı bulunabilir elbette ama, sonraki label nesneleri için başka hesapamalar da
isteyeceksiniz gibi görünüyor. İhtiyaç olan bilgiler üzerinde düşünüp, hangi bilgiler gerekli olacaksa VeriTabanı sayfasında
buna ait kayıtlar önceden yapılmış olmalıdır diye düşünüyorum.
Sokak adeti, VeriTabanı sayfasındaki listedeki mahalle satırının adeti olmuyor mu?
Bu bilgiyi her sokakın karşısında uygun bir sütuna önceden yazmış olmanız gerekmez mi?
Yok eğer ille de Maltepe sayfasındaki adeti bulmak istiyorsanız yine userform ekrana getirilmeden önce bu hesaplama orada yapılmış ve uygun bir alana önceden yazılmış olmalıdır. Oradan da userforma bu bilgi çağrılmalıdır.
Çünkü 2 ya da 8 saniye de şu anda 40.000 satırlık bi alanda sayma yaptırmak hiç anlamlı değil ve belgenizin çalışmasını yavaşlatacaktır,
.
