başka çalışma kitaplarından veri alma

Katılım
15 Mayıs 2008
Mesajlar
95
Excel Vers. ve Dili
2010
türkçe
Altın Üyelik Bitiş Tarihi
29-09-2023
='C:\Users\Bilal\Desktop\Bölge Hesaplar\[Trabzon.xlsm]Özet'!$F$2

Arkadaşlar Yukarıda [Trabzon.xlsm] olan kısım değişken olacak yani bir hücreye bağlayacağım dolaylı formülü ile yapmaya çalıştım fakat hata alıyorum
istediğim başka bir çalışma kitabından seçmiş olduğum bir hücrenin verisini tabloda gösterecem..
örnek ;

A1 Trabzon
A2 Rize
A3 Samsun vs. gibi

="C:\Users\Bilal\Desktop\Bölge Hesaplar\["&G3&".xlsm]"&"Özet'!$F$2"
Bu şekildede denedim olmuyor..
 

halit3

Uzman
Uzman
Katılım
18 Ocak 2008
Mesajlar
12,800
Excel Vers. ve Dili
2003 excell türkçe
ve
2007 excell türkçe
Böyle denermisiniz.
kod ile
Kod:
Range("a1").Value = "='C:\Users\Bilal\Desktop\Bölge Hesaplar\[" & g3 & ".xlsm]Özet'!$f$2"
yeya

formül ile
Kod:
='C:\Users\Bilal\Desktop\Bölge Hesaplar\[ & (g3) &.xlsm]Özet'!$F$2
ama bu şekilde veri almak için dosya açık olmalı yoksa güncelleme olmayacaktır.
 
Katılım
15 Mayıs 2008
Mesajlar
95
Excel Vers. ve Dili
2010
türkçe
Altın Üyelik Bitiş Tarihi
29-09-2023
:( malesef bu şekildede olmadı

='C:\Users\Bilal\Desktop\Bölge Hesaplar\[Trabzon.xlsm]Özet'!$F$2 bu şekilde hücre görünüyor
 

halit3

Uzman
Uzman
Katılım
18 Ocak 2008
Mesajlar
12,800
Excel Vers. ve Dili
2003 excell türkçe
ve
2007 excell türkçe
kod ile çalışıyor
Aşağıdaki kodu sayfanın kod bölümüne yapıştırın

Kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Kalasor = "C:\Users\Bilal\Desktop\Bölge Hesaplar\"
Dosya = Cells(1, 7).Value
deg3 = "'" & Kalasor & "[" & Dosya & ".xlsm]Özet'!R2"
Range("a1").Value = ExecuteExcel4Macro(deg3 & "C6")
End Sub
fareyi nereye tıklarsanız A1 hücresine değeri yazacaktır.
 

halit3

Uzman
Uzman
Katılım
18 Ocak 2008
Mesajlar
12,800
Excel Vers. ve Dili
2003 excell türkçe
ve
2007 excell türkçe
Bu fonksiyon çalışıyor ancak her seferinde güncelleme istiyor.

Kod:
='C:\Users\Bilal\Desktop\Bölge Hesaplar\[& DOLAYLI(G3) & .xlsm]Özet'!$F$2
 
Üst