05-11-2020, 15:00 (En son düzenleme: 05-11-2020, 15:01 erdenferdi06.)
Merhabalar Access kullanıcıları için faydalı oacağını düşündüğüm örneği hem paylaşmak hemde fikir almak için bu örneği paylaşıyoruym.. genelde hep sorguyla sıralama yaparız ve sıra numarasıı verebiliriz ve üst düzey sıralama gerektiğinde kriterden bağımsız sadece raporlarda var. ama bu paylaştığım örnek her ne olursa olsun sıra numarasını satıra göre veriyor. Excele aktardığımızda da yine aynı şekilde.. Ancak benim 1200 kayıtlı formumda kaydırma çubuğuyla kayıtları kaydırdığımda sıralamada bozulmalar oluyor. excele aktarınca sıkıntı yok. formda kaydırırken acaba yeeni satıra yine 1 mi veriyor ondan olablirmi. fikri olan varmı.
ornek (erdenferdi06).rar (Boyut: 42,06 KB / İndirilme: 87)
VBA Kodlar veri1 alani ile SQL hata yapiyor. Sorgu yurutulurken yeni numara hatali gosteriliyor. Daha somut sira no uygulanabilir. Sorguda bir kac alani artan siralama ile karmasik hale geliyor. Formda bu sorguyu kullanirsaniz, guncelleme ve veri girisi yapilamaz.
Sira numarali bir kaydi aramada sorun cikacaktir. Raporda satir sirasi =1 ile yapilabilir, Formda ise tabyoya tekrar etmeyen sirali bir alan ekleme daha verimli sonuc cikarir.
Hocam olmuyor sorguyla sıralama numarası yapmaya çalışmış herkes Dcount vs birşeyler kullanmış uyanıklık etmiş ama atıyorum okulda hastanede ve askeriyede adamın meslek sicili düşük ama rütbe yüksek filtre koysan soldaki numaralar 72,11,43 gibi gelecek, yani ben iif ile özel rütve ve kıdeme göre birime göre özel sıralama yapsamda hiç karıştırmayacak sola yine 1 den başlayarak sıra no koyacaktı onuda anca bununla yapabildik...
Cevabınız ve ilginiz için çok teşekkür ederim. Hocam kesinlikle size saygı duyuyorum sırf cevap verebilmek laf olsun diye yazmadım. Elinize sağlık saygılar...
06-11-2020, 17:00 (En son düzenleme: 06-11-2020, 17:08 erdenferdi06.)
hocam örneği inceledim, tabloya otomatik sıra no ekleyerek yapmışsınız ben kayıt silip kayıt ekleyince bozulmazmı sıra no, tabloya veri eklemeden sorgu üzerinden olmalı
(06-11-2020, 17:00)erdenferdi06 demiş ki: hocam örneği inceledim, tabloya otomatik sıra no ekleyerek yapmışsınız ben kayıt silip kayıt ekleyince bozulmazmı sıra no, tabloya veri eklemeden sorgu üzerinden olmalı
SN'yu kontrol icin koydum, VBA kodunuzla ilgili denemeler yaptigimda 375 ile 500 kayit arasi hatali oldugunu tespit icindi. Siralama ile verilen numara hatali olmayacak senaryo dusunelim, dediginize gore bir yontemi paylasirim.
Aklima tablo alanlari ile beklenen sorguyu VBA'ya yaptirilabilir gibi geldi.
veya Sorgu icinde, veri1'in A12 suzmesine gore
Visual Basic
SELECT(select count(*) from Tablo1 As GeciciTbl where (((GeciciTbl.veri1)<=Tablo1.[veri1])And GeciciTbl.Veri1 Like "A12*"))AS SıraTrz, Tablo1.veri1, Tablo1.veri2, Tablo1.Nu, Tablo1.sn
FROM Tablo1 WHERE (((Tablo1.veri1)Like "A12*")) ORDER BY Tablo1.veri1;
veya
Once Suzme ıle sıralama, arkasından sızın kod ıle numara verme sırası ıle yontem ornegı ıcın
