Hücrede yazılı dosyadan veri alma

Katılım
12 Şubat 2005
Mesajlar
28
A1 hücresinde 07-345 yazıyor bu benim aynı zamanda excel dosya adım. Şimdi bu A1 hücresindeki yazan dosya adından veri almak istiyorum. Örn. ='\imalat\[07-345.xls]sayfa1'!B2
Bunu yapmanın otomatik bir yolunu arıyorum yani A1 hücresinde yazan dosya adı neyse formül ona göre değişebilirmi yoksa her seferinde kendim ellemi belirtmek zorundayım dosya adını.
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,056
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Aşağıdaki kodu sayfanın kod sayfasına kopyalayın.

Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
[b1] = "='\imalat\[" & [a1] & ".xls]sayfa1'!B2"
End Sub
 
Katılım
12 Şubat 2005
Mesajlar
28
Sağolun Levent bey daha kolay bir yolu yokmu acaba bunun çünkü ben uzun bir formül yazıcam oraya ve A1 , A2 , A3 , A4 ... satırlarında yazan dosya adları içinde aynı şey geçerli olcak.
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,056
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
DOLAYLI fonksiyonunuda kullanabilirsiniz ama bu durumdada veri alınacak dosya açık olmalıdır.

Kod:
=DOLAYLI("'\imalat\["&A1&".xls]sayfa1'!B2")
 
Üst