Excel Farklı Sayfalardan Veri
-
Arkadaşlar çalıştığım excel dosyamda onlarca sayfa var. Tüm sayfalarda ki D2 hücresinde bulunan veriyi en başa ekleyeceğim sayfaya çekmek istiyorum. Bunun nasıl yapabilirim.
Saygılar
Mürit
seadog
-
burda ben biraz uğraşmıştım formülü değiştirirsen işini görür...
http://www.tahribat.com/forum/excel-de-dosyadan-veri-cekiyorum-ama-dosya-ismi-ta-232466
-
='Sheet1'!D2
Yukardaki formüllde Sheet1 yazan yere sayfanın adını yaz, istediğin tabloya yapıştır. yapamazsan pm gönder.
-
tereke34 bunu yazdı
='Sheet1'!D2
Yukardaki formüllde Sheet1 yazan yere sayfanın adını yaz, istediğin tabloya yapıştır. yapamazsan pm gönder.
Hocam o formülü biliyorum. Benim sayfa sayım çok fazla ve sayfa isimleri karşık, tek tek yazmak çok uğraştırıcı olacak. Daha kısa birşey var mı ?
-
böyle bi script ile bişeyler çıkartırsın belki.. sheet sayısı önemli değil hepsinin d2 sini toplar, sonra nasıl kullanırsan :)
kolay gele :)
Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open(Path)
Dim Total : Total = 0
For Each sheet in objWorkbook.Sheets
sheet.Activate()
Dim dTwo : dTwo = sheet.cell(2,4).Value
Total = Total + dTwo
Next
objWorkbook.Close()
objExcel.Quit()
edit : bir ara bi proje içinexcellerdeki belirli hücrelere ulaşmak için kullandığım vbs nin birbölümüdür.
-
hocam = yap, aşağıdaki sayfalardan hangisini istiyosan tıkla, hangi hücredeki veriyi çekeceksen seç enter yap
-