• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Soru Kapalı Dosyaların Tümünü Seç ve Birleştir.

Katılım
9 Ekim 2009
Mesajlar
1,626
Excel Vers. ve Dili
türkçe
2003
İyi günler ekli dosyada veri girişi sayfasından Dosya seç ve birleştir butonu ile ekli klasördeki tüm dosyaları seçip; istifEbatExcel sayfasında birleştirip; masaüstüne BİRLEŞTİRİLEN EBAT LİSTELERİ adlı bir yeni dosya oluşturabilir miyiz.Veriler alınırken tüm dosyalardaki 1.satırdaki veriler alınmayacak.Yardımlarınızı bekliyorum. Saygılar sunuyorum


lİNK:1 https://dosya.co/hhmrazvsyc9r/ASIL_DOSYA.xlsx.html
lİNK:2 https://dosya.co/8xtahbabx7jr/ASIL_DOSYA.xlsx.html
 
Klasör içindeki dosyaların sayfa isimleri aynımı yoksa farklı mı
 
Klasör içindeki dosyaların sayfa isimleri aynı olmak şartı ile istediğinizi yapıyor. Makro içinde revize edeceğiniz tek yer veriyi aldıktan sonra masaüstüne kaydetme yolunu kendinize göre güncelleyin. Güncelleyeceğiniz satır krımızı renki olan kısım : ActiveWorkbook.SaveAs Filename:="C:\Users\metin\Desktop\BİRLEŞTİRİLEN EBAT LİSTELERİ.xlsx",
 

Ekli dosyalar

ADO ile başka bir alternatif ektedir.... Dosyayı, verilerin alıncağı diğer dosyaların bulunduğu klasöre yerleştirdikten sonra çalıştırabilirsiniz.


.
 
ADO ile başka bir alternatif ektedir.... Dosyayı, verilerin alıncağı diğer dosyaların bulunduğu klasöre yerleştirdikten sonra çalıştırabilirsiniz.


.
Haluk bey teşekkür ederim. Dosya verilerin alınacağı klasör içerisinde olmadan ve klasör içerisinde istediklerimizi işaretleyerek alabilir miyiz. .Ayrıca alınan veriler asıl dosyada 2.satırdan başlayarak alınabilir mi .Veriler alındıktan sonra masa üstünde BİRLEŞTİRİLEN EBAT LİSTELERİ.xlsx dosyası olarak kayıt yapmak mümkün müdür ?
 
DOSYA LİNKİ
Metin bey teşekkür ederim. Dosya yolunu masa üstü olarak makro kendisi bulabilir mi ?.Çünkü her bilgisayarda değiştirmek gerekiyor. Ayrıca veri alınacak klasör içerisinden işaretleme yaparak alabilir miyiz. Bazen klasör içerisinde alınmasını istemediğim dosyalar olabiliyor. Seçim yaparak alabilir miyiz (Shift tuşu ile işaretleyerek)
 
Dosyalarınız "xlsx" uzantılıysa, görünmemesi mümkün değil ....

.
 
Doğrusu; ben özellikle A3'den başlasın diye bir ayar yapmadım ...... işin orasında bir cinslik var ama şimdilik çıkaramadım.

.
 
Aşağıdaki satırı, eskisiyle değiştirin ...

Kod:
    FD.Filters.Add "Excel dosyaları", "*.xls;*.xlsx;*.xlsm"

.
 
Gerçi kullanılan driver'ın 64 Bit'de sorun çıkartmaması gerekir ama bende 64 Bit Excel olmadığı için deneme şansım yok .....

Peki 64 Bit'de ne hatası verdi?

.
 
Gerçi kullanılan driver'ın 64 Bit'de sorun çıkartmaması gerekir ama bende 64 Bit Excel olmadığı için deneme şansım yok .....

Peki 64 Bit'de ne hatası verdi?

.
Haluk hocam çalışmanızı silip tekrar indirdim 64 bitte çalıştı. Sayın ormanın istediği şekilde çalışmanız bende çalıştı. Herhangi bir sorun yok
 
Geri
Üst