Makro için döngü oluşturmak

Katılım
29 Ocak 2007
Mesajlar
22
Excel Vers. ve Dili
excel 2003
merhaba arkadaşlar,

Bu forumdan sevgili arkadaşların yardımı ile ekteki dosyayı hazırladım, ve gerçekten bana çok yardımı oldu. sizlerden yeni bir yardım rica edceğim. ornek dosyayı incelediğinizde zaten anlayacaksınız. kısaca ben ne yaptığımızı anlatayım.

Makroyu çalıştırdığımzda;

c:\ klasörünün içindeki text dosyaları bizim excel dosyamıızn sayfa 1 a hücresine yazıyor; daha sonra bunu d hücresinde yazan veriler ile karşılaştırıp bulduklarını sayfa 2 a hücresine yazıyo, olmayanlara, b hücresine yanına yok yazıyor, ve sayfa 2 a hücresindeki sonucu yeni bir dosya açıp ona kaydettikten sonra; ornek dosyamızdaki sayfa 1 a hücresini ve sayfa 2 a ve b hücresini temizliyor.

ancak 65000 kayıttan fazla elimde text dosyası var, ve hepsini yüklediğim zaman pc kitneiyor.

Benim yapmak istediğim ise;

makro çalıştığı zaman; c:\ klasörünün içinden 20 tane text dosyasını alıp, bizim ornek dosyamızın sayfa 1 a hücresine yazması, ve c:\klasörün içinden bu 20 text dosyasını silmesi;

Daha sonra; sayfa 1 a hücresine yazmış olduğu text dosyasını , d hücresi ile karşılaştırp, olanları sayfa 12 a hücresine yazması, ( şu anki makroda olmayanları da sayfa 2 a hücresine yazıyor, ancak yanına b hücresine yok yazıyor. benim istediğim yokları silmesi veya sayfa 2 a hücresine sadece olanları yazması) bu işlemden sonra yeni bir excel dosyası açıp, sayfa 2 a hücresinde bulduklarını yazmasıdır. ve ornek dosyamızdaki sayfa 1 ve sayfa 2 a ve b hücrelerini temizlemesi gerekmektedir.


Son olarak; bu işlemi tekrar tekrar yapılması gerekmektedir. elimde 2000 e yakın text dosyası ve bu text dosyalarınn içinden bulunması gereken 8000 veri var. Umarım mümkün bir şey istiyorumdur.
yardımlarınız için şimdiden çok teşşkür ederim. ayrıca böyle bir forum kuran yönetcilere ayrıca tebrik ve teşekkür ederim...
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,058
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Bence text dosyanızında bir örneğini ekleyin, birde excel dosyanızın d sütunundada hiç veri yok, yani ne ile karşılaştırılacak bu belli değil.
 
Katılım
29 Ocak 2007
Mesajlar
22
Excel Vers. ve Dili
excel 2003
Merhaba leventm, öncelikle cevap verdiğiniz için teşekkürler,

Ekte örnekleri gönderiyorum, text dosyasında "3454546 aaaaaaaaaaaaaa" benzeri kayıtlar var; örnek.xls file'ın d sütununda ise ; "3454546" benzeri rakamlar var;

text dosyasını excel file'a attıktan sonra d sütunundaki 3454546 rakamına göre aratıp; a sütununda bulduktan sonra sayfa 2 a sütununda buldup sayfa 1 a sütunundaki veriyi; sayfa 2 a sütununa yazıyor.

Ben 1000 yakn text dosyasında yer alan 80 000 veriden; 8000 tane "3454546" benzeri numaradan istediğimi verileri bulmaya çalışıyorum. İstediğim 1000 text dosyasını küçük parçalar halinde alıp aramayı yapması;

ilginize çok teşekkür ederim...
 
Katılım
29 Ocak 2007
Mesajlar
22
Excel Vers. ve Dili
excel 2003
Arkadaşlar,

sanırım benim istediğimi yapmak mümkün değil. sadece yok yazan sütünları sildirmez miyiz?

tşk
 
Üst