• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

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ı.
 
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
 
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.
 
DOLAYLI fonksiyonunuda kullanabilirsiniz ama bu durumdada veri alınacak dosya açık olmalıdır.

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