farklı excel kitabından macroyla veri almak

[mersilen]

selamlar
aynı klasör içinde bulunan farklı excel kitabından sorgulama yapan aşağıdaki koddaki kısmı nasıl düzeltmem gerekir?
excel kitabının açık ya da kapalı olması önemli mi?
aynı kitap içinde
g="sayfa 3" yapınca çalışıyor
g = "'[cder .xlsm]Sayfa28'!" kısmını da formül yazma kısmından esinlendim.

Sub cder()
sut = -19
  g = "[COLOR="Red"]'[cder .xlsm]Sayfa28'![/COLOR]"
  
  For sat = 5 To 10
  
  sut = 49 + sut
'a30=sondalama tarihi ve zamanı=21.12.2010 - 20:49
Range("A" & sat).Value = Worksheets(g).Range("A" & (sut - 7)).Value
  Next sat
End Sub

 

[Levent Menteşoğlu]

Yazdığınız kod ancak kendi içindeki "sayfa 3" isimli sayfasından veri alır. Veriyi hem dosya açıkken hemde kapalıyken almak mümkündür. Burada tercih sizindir. Tercihinize ve veri alınacak dosya ile verilerin alındığı dosyanın bir örneğini eklerseniz yardımcı olmaya çalışırız.

 

[mersilen]

tekrar merhaba
levent bey ilginize teşekkür ederim
modüle kodları ekledimexcel kitabında yanlışlık yapmayım diye 2. bir excel kitabı kullanmak istiyorum, kod onu sorgulayacak
sub chder() olanını çalıştıramadım
sub chder1() çalışıyor

 

[Levent Menteşoğlu]

Ben dosyalarınızdan bir şey çıkaramadım. Dosyaların neden birisi xls diğeride xlsx uzantılı. Ayrıca iki dosya arasındaki verilerde de hiç bir bağlantı kuramadım.