Dıstan veri alma

[Kemal Demir]

İyi gunler

Arkadaslar bir klasor içerisinde 2 ayrı xls dosyam var

A ve B isminde

A dosyasının tablos sheetınden c6:c10 aralığını toplayacak
b dosyasının özet sheetıne d5 hücresine toplamlarının sonucunu yazdırmak istiyorum
Tabiki Sonuc benim İçin Hüsran

Ã?rnek İki Dosya Yolluyacağaım yardımcı olursanız sevinirim

Saygılar.

 

[tevfikseremet]

b dosyasının c5 hücresine aşagıdaki kodu yazarak deneyebilirsiniz...

=TOPLA([A.xls]TABLO!$C$6:$C$9)

iyi çalışmalar...

 

[tevfikseremet]

B dosyasının Ã?ZET Sayfasının C5 hücresine aşagıdaki kodu yazarak deneyebilirsiniz...

=TOPLA([A.xls]TABLO!$C$6:$C$10)

iyi çalışmalar...

 

[ojibu]

çok basit sonucun görüntülenmesini istediğin hücre ye gel eşittir tuşuna bas pencereden 2 . dosyayı aç toplamın alındığı yeri işaretle entere bas tamam.
=[A.xls]TABLO!$C$11 ile işlem tamam

 

[Kemal Demir]

Arkadaslar sizlere katılıyorum ama bunu Macro İle Yapabilirmiyiz

Dosyayı açmadan a dosyasını açmadan

veya hut dosya acmamız gerekiyorsa yine

olusturulucak macro kodları ıle yapmamız mumkunmudur?

Saygılar.

 

[Tarkan VURAL]

Dosyadan veri alarak işlem yaptırmak

Merhaba kodlarla yapmak elbette mümkündür.
Ek'te üç adet dosya var:
A = verilerin bulunduğu sayfa
B = verilerin toplamının yazılacağı yer
rakkas = kontrol ( ara ) dosya

Rakkas dosyasını açıp butonu tıklamanız istediğiniz işlemi en basit kodlarla yerine getirecektir. ( A, B dosyalarınızın aynı klasörde olduğuna dikkat etmelisiniz, yeri farklı ise kodlar buna göre düzenlenmeli.)

[vb:1:d915170dd8]Private Sub CommandButton1_Click()
ChDir "C:\rakkas"
Workbooks.Open Filename:=("C:\rakkas\B.xls")
Workbooks("B.xls").Sheets("ozet").Range("d5").FormulaR1C1 = "=SUM([A.xls]tablos!R6C3:R10C3)"
End Sub[/vb:1:d915170dd8]


Kolay gelsin.
Tarkan VURAL