makro ile veri aktarımı

[musti60]

arkadaşlar:
forumu inceledim. ancak incelediğim sayfalarda ilgilendiğim konu ile ilgili bilgilenemedim. Bana bir yardım lütfen
çalıştığım bordro.xls dosyası var. Bu dosyada A1,A2,A3 hücrelerine bazı bilgiler giriyorum. Bu bilgileri de Ã?denekler.xls dosyasında B1,B2,B3 hücrelerine kopyalamak istiyorum. yardımlarınız için şimdiden teşekkürler.
Biraz acil lütfen

 

[nzmiduman]

SAYIN musti60

Forumun makro bolumunde aradıgın cevap var istersen bır daha bak

 

[bedersu]

Merhaba,
Forumda vardır herhalde ama bir alternatif;

Sub Kopyala_Yapıştır()

Range("A1:A3").Select
Selection.Copy
Workbooks.Open Filename:= _
"C:\Documents and Settings\xxx\Desktop\Ã?denekler.xls"
Range("B1").Select
ActiveSheet.Paste
ActiveWorkbook.Save
ActiveWindow.Close

Application.CutCopyMode = False

End Sub

 

[mrt]

Verilerin sürekli aynı olacaksa
Ã?denekler.xls dosyasındaki b1,b2 ve b3 hücrelerie ekli formülleri girebilirsin.
Sayfa adı yazılı olan yere bordro.xls dosyasından alacağın verilerin bulunduğu sayfa adı olmalı.

b1 hücresine ='[bordro.xls]sayfaadı'!$A$1
b2 hücresine ='[bordro.xls]sayfaadı'!$A$2
b3 hücresine ='[bordro.xls]sayfaadı'!$A$3