Hücredeki Değere Göre Adres Alma

[myefsane]

Merhaba A1 Hücresine formülle Ağ sürücüsünde olan bir excel dosyasının içinden veri alıyorum. A1 hücresinde ki adrese göre hangi klasör hangi dosya olduğunu bulup veriyi oradan çağırması gerekiyor . Fakat bunu başaramadım. Her seferinde B5 i alıyor. yardım eder misiniz?

A1 : \\belgelerim\2020\10 EKİM\12\[2.xlsx]YENİ'!B7

Kullandığım makro :

Range("a1").Select
    ActiveCell.FormulaR1C1 = "[2.xlsx]YENİ!B5"
    Range("E2").Select
    ActiveCell.FormulaR1C1 = "=[2.xlsx]YENİ!R[3]C[-3]"
    Range("E2").Select

 

[Korhan Ayhan]

Forumda ExecuteExcel4Macro ifadesi ile arama yapınız.