Çözüldü Harici xlsm Dosyalardan Veri Çekmek

Merhaba,

Dosyaların bilgisayardaki bulunduğu dizinler aşağıdaki şekildedir.
Her yeni deneme için sıra numarasına göre yeni bir klasör açılmakta ve xlsm dosyaları konulmaktadır.

D:\LGS\2020-2021\1
D:\LGS\2020-2021\2 (Örnek Dosyalar Bu dizindedir)
D:\LGS\2020-2021\3
D:\LGS\2020-2021\4
D:\LGS\2020-2021\5



D:\LGS\2020-2021\2 Dizinine bakarsak

_Deneme 2 Genel Sonuçlar.xlsx

ve

Deneme 2 Din Kültürü İstatistik.xlsm (Tüm isimli sayfadan veriler alınacak)
Deneme 2 Fen Bilimleri İstatistik.xlsm (Tüm isimli sayfadan veriler alınacak)
Deneme 2 İngilizce İstatistik.xlsm (Tüm isimli sayfadan veriler alınacak)
Deneme 2 İnkılap Tarihi İstatistik.xlsm (Tüm isimli sayfadan veriler alınacak)
Deneme 2 Matematik İstatistik.xlsm (Tüm isimli sayfadan veriler alınacak)
Deneme 2 Türkçe İstatistik.xlsm (Tüm isimli sayfadan veriler alınacak)

dosyaları bulunmaktadır.


Burada yapılmak istenen ders isimleri olan xlsm dosyalarının Tüm isimli sayfasından en sağdaki D - Y - B (Doğru - Yanlış - Boş ) hücrelerine karşılık gelen değerler alınarak _Deneme 2 Genel Sonuçlar.xlsx dosyasının ilgili alanlarına yazdırılacaktır.
Bu işlemi İNDİS ve KAÇINCI fonksiyonlarıyla yapıyorum. Ancak her yeni denemede isimleri ve eklenen dizinleri yeniden yazmam gerekiyor. Bu da uzun zaman gerektirebiliyor vb.
Bunu Formüllerle mi yapmak mantıklıdır. VBA ile mi yapmak mantıklıdır emin değilim ama VBA ile yapmak sanırım daha mantıklı gibi geliyor.
VBA bilgim bunu en mantıklı ve işlevyel şekilde yapabilecek düzeyde değildir.

_Deneme 2 Genel Sonuçlar.xlsx dosyasını açtığımızda otomatik olarak üstteki 6 adet ders isimleri olan .xlsm dosyalarından bu derslere ait D - Y - B bilgilerini almasını sağlayabilir miyiz?



Ekli dosyayı görüntüle Örnek Dosyalar.rar