Kapalı dosyadan şarta bağlı veri almak

[mozdem]

Office 2021 ile çalışıyorum.
Bilancolar klasöründe kapalı olarak bulunan Excel dosyalardaki verilerin A sütundaki veriler eşleştirilerek AnaDosya isimli XLSM dosyamın DATA sayfasına aktarılmasını istiyorum.
"AnaDosya.XLSM" dosyamın DATA sayfasının A3 den son satıra kadar olan isimli verilerin "Bilancolar" klasöründe bularak verileri eşleştirerek DATA sayfasının B:M sütunlarına yazdırılmasını istiyorum.
Bunun ile ilgili bir çalışma yaptım ama hata alıyorum. Sorunu çözemedim.
yardımlarınızı bekliyorum.

 

[DoğanD]

Merhaba,

TargetNames aralığını sütun olarak atadığınız için hata veriyor gibi görünüyor. Satırı şu şekilde dener misiniz?
Set targetNames = targetSheet.Range("A3:A" & targetSheet.Range("A" & Rows.Count).End(xlUp).Row)

 

[mozdem]

Merhaba,

TargetNames aralığını sütun olarak atadığınız için hata veriyor gibi görünüyor. Satırı şu şekilde dener misiniz?
Set targetNames = targetSheet.Range("A3:A" & targetSheet.Range("A" & Rows.Count).End(xlUp).Row)

Ekli dosyayı görüntüle 255591

Teşekkür ederim