Klasör ve alt klasörlerden dosya kopyalama

Katılım
28 Eylül 2010
Mesajlar
1
Excel Vers. ve Dili
2010 tr
Merhabalar
Uzun yıllardır VBA ile kodlama yapmaktayım ancak kısa bir zamandır Excel VBA ile de kodlamaya devam etmekteyim.

Bir konuda yardıma ihtiyacım bulunmakta.

Konu şu;
Bir ana klasör ve bu klasörün içinde bulunan yüzlerce alt klasör olduğunu ve bunların da içlerinde onbinlerce adette (.txt) dosya olduğunu düşünün. Bu txt'lerin boyutları ya sıfır yada 1, yani ya dolu ya boş gibi düşünebilirsiniz.

Yapmak istediğim;
- Kullanıcıya kaynak yol seçtirteceğim, (bu yol (path) local olabileceği gibi networkte de bir yer olabilir)
- Yine kullanıcıya dosyaların kopyalanacağı yolu seçtirteceğim (local veya network)
- Tarih aralığı girdirteceğim,

Bu bilgiler ışığında kodlama, verilen path'e gidip burada klasörlerin içine teker teker girip , tarih aralığına (dosya değiştirme veya oluşturma) bakarak, bu aralığa uyan TXT'leri, belirlenen hedef klasöre kopyalayacak.
Yalnız bu kopyalamada bir handikap olacak, sadece byte'ı 1 olanları kopyalayacak 0'ları dikkate almayacak.

Buradaki amaç şu; Farklı klasörlerde bulunan ve byte'ı 1 olan ve verilen tarih kıstasına da uyan dosyaların, tek bir klasörde toplanması durumu.

Neden böyle bir işlem yapacağımı da belirteyim. Hazırlamış olduğum diğer bir excel vba ile bu byte'ı 1 olan dosyaları tek tek okutarak farklı bir yerde tek bir dosya oluşturacağım. Bu dosya aslında yapısı değişmiş bir arayüz veya transfer dosyası olacak aslında.

Daha sonra şirkette kullandığımız başka bir programa, bu transfer dosyasını göstererek içeriye dataları transfer ettireceğim. Böylelikle belki günlerce uğraşılarak, rapor çıkartılarak ve sonrasında manuel olarak elle tek tek girilen bazı bilgileri sisteme otomatik eklettirmiş olacağım.

Biraz uzun yazdığım için kusura bakmayın.
Konu hakkında yardımcı olabilirseniz sevinirim.
Saygılarımla
Cengiz
 
Üst