düşeyara makrosu hk yardım

[achil19]

Herkese merhaba,
Makroyu yeni öğrenen biriyim. Buradaki hocalarımın yardımı ile bir şeylerin mantığını kavradım yardımcı olan herkese teşekkür ederim
aşağıdaki linkteki dosyaya düşeyara makrosu ile istediğim değerleri getirebildim

https://drive.google.com/file/d/0B6jo34yj3V6rWEVFbkdHOGVobzQ/view?usp=sharing

Sub MAKRO2()
On Error Resume Next
For X = 2 To Sheets("MAKRO").Cells(Rows.Count, "A").End(3).Row
Sheets("MAKRO").Cells(X, "C") = WorksheetFunction.VLookup(Sheets("MAKRO").Cells(X, "A"), Sheets("ARANAN KISIM").Range("A:B"), 2, 0)
Next X
MsgBox "DÜŞEYARA TAMAMLANDI"
End Sub


Şimdi yapmaya çalıştığım farklı iki excel çalışma sayfasından istediğim değerleri düşeyara makrosu ile getirebilmek. baya arama yaptım, bir iki benzer örnek buldum ama kendime uyarlayamadım. Mantığını anlayamadım.
yardım edebilecek kişi kısa bir şekilde mantığını da anlatabilir mi rica etsem
Herkese çok teşekkür ederim. Dosyalar aşağıdaki linktedir
1 excel dosyasından 2 excel dosyasına değerleri getirmek istiyorum

https://drive.google.com/open?id=0B6jo34yj3V6rNXRlRjNxalVMYlU
https://drive.google.com/open?id=0B6jo34yj3V6rMDY3ZWhocVpIT00

 

[kemalist]

eklediğiniz dosyalarda makro yok

 

[achil19]

Merhabalar,
dosyalarda makro yok, nasıl yazılır diye sormak istedim
Aynı excel dosyasından farklı çalışma sayfalarından makro ile düşeyara yapabildim
fakat farklı excel dosyalarından verileri makro ile alamadım

 

[kemalist]

Dosyaları bir klasörde toplayarak deneyin

 

[achil19]

Tekrar merhaba,
anlatmak istediğimi anlatamadım galiba.
Aynı excel dosyası için makroyu sorunsuz yazabiliyorum,
Örneğin hangi çalışma sayfasını seçeceğimi Sheets("MAKRO").Cells(X, "B") şeklinde yazabiliyorum
ama ayrı bir excel sayfasından veriyi çekemiyorum.
Bunun için nasıl bir kod kullanmam gerek onu bilmiyorum