Çözüldü Kapalı Sayfalardan Belirtilen Koşulla Göre Veri Aktarmak.

[Erdem Akdemir]

@ZEKİbey , @Haluk bey teşekkür ederim.

 

[Haluk]

Zeki Bey;

"CopyFromRecordset" metodu 64 Bit Office'de 65.536 satırdan fazla veriyi işleyebiliyor mu? Merak ettim .... Çünkü @gicimi 100-150.000 veri ile çalışacakmış.

.

 

[Erdem Akdemir]

Zeki bey arşivlik bir çalışma olmuş.
Elinize sağlık.

 

[Zeki Gürsoy]

Haluk Bey, "CopyFromRecordset " metodunda bu sınırlama ile hiç karşılaşmadım. Bu kadar büyük veri ile test yapmadım. Müsait zamanda hem 32 hem de 64 bit Excel ile bir test yaparım.

Zeki bey arşivlik bir çalışma olmuş.
Elinize sağlık.

Teşekkürler Sayın @kuvari

 

[gicimi]

@Zeki Gürsoy Bey çok teşekkür ederim. Sorun çözülmüştür. Emeğinize sağlık. Kolaylıklar...

 

[Haluk]

Problem neymiş ?

.

 

[gicimi]

@Haluk Bey Sayfa isimlerinden kaynaklı olduğu. @Zeki Gürsoy Bey'in daha teknik bilgi vereceğini düşünüyorum.

Dosyanın son hali ektedir.

 

[Haluk]

lginç ... daha önce 51 No'lu mesajınızda bütün sayfa isimlerinin "Sayfa1" olduğunu belirtmiştiniz.

Şimdi ne oldu da durum değişti, anlamadım ....

Zeki Bey zaten yapacağını yapmış ....., hatanın sayfa adlarından kaynaklandığını 50 No'lu mesajjında yazmıştı.

Bu arada şunu belirteyim;

Ücretini verseniz bile, bu forumda kimsenin yapamayacağı bir dosya hazırlayıp Zeki Bey vermiş. SQL benim ilgi alanım olmamakla birlikte, kendisine ben şahsım adına bir kere daha teşekkür ederim.

.

 

[Zeki Gürsoy]

Övgü dolu sözleriniz için ben de size teşekkür ederim. Sağolun, eksik olmayın.

 

[Haluk]

Merhaba;

SQL konusunu irdelemek amacıyla, Zeki Bey'in 29 No'lu mesajındaki açıklamalar ve 48 No'lu mesajının ekindeki dosyadan esinlenerek ben de bir alternatif dosya oluşturdum.

Bu dosyadaki fark; gerekli geçici tablo MS Access'de oluşturulmuyor, onun yerine kodların yazılmış olduğu Excel dosyasında oluşturulan bir sayfa kullanılmaktadır. Kodun çalışması 6 saniye kadar sürüyor.

Dosya, verilerin alıncağı Report.xlsx, Data.xlsx, ADM.xlsx ve SDM.xlsx dosyalarının olduğu klasöre yerleştirildikten sonra kodlar çalıştırılmalıdır.

Selamlar,

Revizyon:

1) Kodun çalışma süresini milisaniye mertebinde göstermek üzere yapılan revizyon nedeniyle, dosya yenilenmiştir. (29/09/2018 Saat: 21:16)
2) Sorgulamaların sonuçları kodlarla oluşturulan "Report" sayfasında listelenmesi sağlandı. (30/09/2018 Saat: 01:02)
3) Kodların yazıldığı dosyada, makronun çalışması sonucunda oluşabilecek hatalardan dolayı Report.xlsm dosyasının bozulması ve verilere daha sonra ulaşılaması riskine önlem almak üzere, sorgulamadan sonra sonuçların ayrı bir dosyada listelenmesi için alternatif dosya (Start_HD.xlsm) hazırlandı. (30/09/2018 Saat: 12:25)
4) 3. maddede belirtilen dosyadaki kodlar revize edildi. Sorguların sayısı azaltıldı, diğer Excel dosyalarından yapılan sorguların sonuçları geçici sayfaya yazdırılmadan dosyaya aktarıldı. Nihai dosya olduğu kabul edilerek daha önce bu mesaj ekinde verilen diğer dosyalar forumdan silindi. (30/09/2018 Saat: 20:47)

.

 

[halit3]

Merhaba konuyu pek anlamadım ancak şunları söyleyeceğim
7. nolu mesajdaki dosyaları indirdim kodları çalıştırdım hata verdi ilgili mesajdaki dosyaları açtığımda dosyalar hatalı açıldı ve uzantılarını xlsb olarak yeniden kayıt yaptım bir iki saniyede verileri getirdi

Diğer taraftan 67 nolu mesajdaki dosyalarıda indirdim orada da aynı durum oldu dosyalar açıldığında hata verdi burada 7. nolu mesajdaki dosyaları uzantısını xlsx olarak yeniden kayıt yaptım 7 nolu mesajdaki kod bir iki saniyede verileri getirdi.

Yukarıda da yazdım konuyu pek anlamadım dosyaları farklı kayıt yapınca veriler geliyor. sanki dosyaların fiziki durumu bozulmuş gibi geldi bana

 

[Haluk]

Halit Bey;

Sanıyorum bu konuya ilk başlarda müdahil olan arkadaşların (Sayın Ömer Baran ve Turist) indirdiği dosyaları incelediniz. Yaklaşık 70 adet mesaj yazıldı şimdiye kadar ve konu SQL'e döndükten sonra olumlu veya olumsuz kendilerinden bir mesaj gelmedi.

Sizin eklediğiniz dosyalar arasında bulunan ve içlerinden veri alınacak olan 4 adet dosya, bahsettiğim arkadaş(lar) tarafından sadeleştirilmiş dosyalar. Sanıyorum bu dosyalardaki "NULL" verilerle uğraşmamak için veri dosyaları yeniden oluşturulmuş. Halbuki; Zeki Beyin 54.mesajında da belirtildiği gibi bu dosyaların herbirinde, "NULL" verilerle birlikte yaklaşık 100.000'er adet veri var.

48. mesajda Zeki Beyin eklediği dosya ve benim 70. mesajda eklediğim dosyalar, orjinal (içinden "NULL" değerler ayıklanarak sadeleştirilmemiş) dosyaları kullanmaktadır.

Ayrıca, söz konusu Report.xlsx, Data.xlsx, ADM.xlsx ve SDM.xlsx dosyaları soruyu soran @gicimi tarafından daha sonra yenilenmişti. Bu dosyalara da 59 ve 60. mesajlardaki linklerden erişebilirsiniz. Bahsettiğiniz kodlar, bu dosyalarda çalışıyor mu veya ne kadar sürede sonuçları getiriyor, denemediğim için bir şey diyemeyeceğim.

(Not: Yukarıda 70. mesajdaki kodun çalışma süresini milisaniye mertebinde göstermek üzere yapılan revizyon nedeniyle, dosya yenilenmiştir.)
.

 

[gicimi]

@Haluk Bey Öncelikle ilginiz ve konu hakkında yardımlarınız için teşekkür ederim. #70. mesajda belirtmiş olduğunuz dosyada çalıştı. Herhangi bir hata ile karşılaşmadım. Teşekkür ederim.

 

[Ziynettin]

Merhaba,
Sayın Haluk Beyin çalışmasında ne kadar sürede sonuç alıyorsunuz.

 

[gicimi]

@Haluk Bey 100.000 veride zaman testi yaptım ama hata ile karşılaştım.

 

[Haluk]

@gicimi ;

Veri adedinin 100.000 olması o hataya sebep olamaz.

Bu arada; 70 No'lu mesajımın ekindeki dosyayı yeniledim. Bir de onu deneyin....

Ziynettin Bey;

Benim kodun çalışması bilgisayarda yaklaşık 4 - 5 saniye sürüyor. Aşağıdaki animasyonda görebilirsiniz.



.

 

[gicimi]

@Haluk Bey 5 sn sürdü. Hatayı anladım. Pc de Excel 2010 ve Excel 2016 kurulu Excel 2016 çalışıyor. Excel 2010 ise çalışmıyor. #75 mesajda belirtmiş olduğum hatayı veriyor.

 

[Haluk]

Ben kodları Excel 2010 versiyonunda hazırladım ve bende hiçbir sıkıntı yok.

Siz 100.000 adet veri ile test yaptınız mı ?

.

 

[gicimi]

Evet yaptım.
Son revize etmiş olduğunuz dosyayı indirdim "Excel 2010" çalıştırdım ve aynı hatayı aldım. "Excel 2016" ile herhangi bir hata ile karşılaşmadım.

 

[halit3]

Dosyaları manuel açın ve farklı kayıt yapın adlarını değiştirmeyiniz herhalde kodlar çalışacaktır.