Harici Çalışma Kitabından Veri Alma

[seckinbilgic]

Excel Versiyonu

Excel 2016

Excel Sürümü

64 Bit

Excel Dili

Türkçe

Merhaba

Belli bir klasörün içerisinde 0001_****.xlsm ---- 0500_*****.xlsm
isimli dosyalardan "kimlik" isimli worksheet'in içinden "C3" hücresini bularak TCkimlik numaralarının harici bir listesini hazırlamaya çalışıyorum.

VBA üzerinden bu dinamik veri çağırmayı nasıl yaparım? 500 dosyayı tek tek seçmeden mümkün mü?

 

Hücredeki Değişken Verinin Toplamı

makroya hücreden veri almak

[ExcelDepo]

Merhaba,

Gizlilik sorunu olmayacak şekilde örnek bir dosya ekleyebilir misiniz?
Sanırım ADO yöntemi ile hızlı bir şekilde sonuca gideriz.

 

[seckinbilgic]

Dış veri alacak bir makro buldum, lakin her dosyayı tek tek seçmem gerekiyor.

%cd%\lu177_tate\0001_****\0001.****.xlsm dosyasını otomatik seçmesi için seçim kodunu modifiye etmeye çalışıyorum.

 

[ExcelDepo]

Hocam akşam geç saatlere kadar mobil olacağım bakma ihtimalim kısa sürede yok ama benzer bir dosya eklemiştim bizim ExcelDepo'ya.
Alt Klasörlerden Veri Listeleme şu linkten açıklamayı bir okursanız, sanırım sizin de benzer bir şeye ihtiyacınız var.

Eğer açıklamadaki kısımlar talebiniz ile eşleşiyorsa, size dosyayı iletmeye çalışacağım incelemeniz için.
Keza siteden dosya indirilemiyor hemen.

 

[selmank]

Eklediğiniz rar dosyası sanırım zarar görmüş. Ben açamadım.. Tekrar yükler misiniz?

 

[selmank]

Örnek dosyanızı göremedim ama anlatıklarınızdan anladığım kadarıyla aşağıdaki kodu yazdım. Çalıştırdığınızda sizden klasörü seçmenizi isteyecek. Sonrasında bu klasör içinde olan ve ismi başında 4 tane rakam olan excel dosyalarını sırayla açıp "kimlik" sayfası varmı diye bakacak. Bulursa C3 hücresindeki bilgiyi Sheet1' de alt alta gösterecek.
Programı her çalıştırdığınızda sheet1 temizliniyor, dikkat.

İndirmek için giriş yapmanız gerekmektedir.
(55 satır)

 

[seckinbilgic]

Örnekleri tekrar gönderiyorum

 

[selmank]

Dosyalarınız sanırım alt klasörlerin içinde. Yani 500 dosya ve 500 alt klasör var. Öyleyse yukarıdakinden daha farklı bir şey gerekiyor.

Eklediğim dosyayı kontrol eder misiniz?

 

[seckinbilgic]

Evet her dosya kendi numarasının bulunduğu alt klasörde

Ana klasörde kodu denediğimde tamamını deneyip sadece 2 tanesinin bilgisini seçti.

Lu177_tate\0541 ve 0337 nolu dosyaları nasıl seçti.

 

[selmank]

Seçkin bey, bir önceki mesajımda alt klasörlerin içini de tarayıp tüm excel dosyalarını bulan bir kod vermiştim. Dosyayı indirip incelerseniz daha çok işinizi görebilir. Sonrasında merak ettiğiniz detayların üzerinden geçeriz.

 

[cakarem]

Sayın @seckinbilgic
Sorunuz çözüme ulaşıldı ise konuyu çözüldü olarak işaretleyip, kilitleyelim.

 

[seckinbilgic]

Sayın @seckinbilgic
Sorunuz çözüme ulaşıldı ise konuyu çözüldü olarak işaretleyip, kilitleyelim.

ne yazık ki kodumuz dosyaları bulamıyor. 500 dosyanın 1-2 tanesini listeliyor.

iş yoğunluğundan ben de inceleyemedim. haftasonu tekrar inceleyeceğim.

 

[selmank]

Son mesajınızdan önce bir dosya eklemiştim.. Onu gördünüz değil mi?

 

[seckinbilgic]

Son mesajınızdan önce bir dosya eklemiştim.. Onu gördünüz değil mi?

evet hocam, ne yazık ki çalışmıyor.

sadece 2 tane dosyayı görüyor 500 adet dosya içerisinden.

 

[selmank]

Seçkin bey, merhaba..
Bir kaç problem varmış.. Ekteki dosyayı deneyebilir misiniz?

 

[cakarem]

Sayın @seckinbilgic
Sorunuz çözüme ulaşıldı ise konuyu çözüldü olarak işaretleyip, kilitleyelim.

 

[seckinbilgic]

Seçkin bey, merhaba..
Bir kaç problem varmış.. Ekteki dosyayı deneyebilir misiniz?

Elinize sağlık. muhteşem olmuş. kilitleyebiliriz.