başka sayfaya koşullu veri aktarma

[esraf]

ekli dosyada örnek üzerinde sorunumu açıkladım.yardımcı olabilecek arkadaslara şimdiden tşkler... iyi akşamlar

 

[turist]

Dosya ekli değil.

 

[esraf]

hep aynı hatayı yapıyorum tşk ederim uyarınız için

 

[kemal turan]

merhaba,
Bu benim bu forumda cevap olarak kod yazdığım ilk konudur.
İnşaallah isteğinizi anlayabilşimdir.
Sayfa2 nin kod bölümüne aşağıdaki kodu ekleyin.
sayfayı açtığınızda veriler gelecektir.

Private Sub Worksheet_Activate()
a = Sheets("sayfa1").Cells(Rows.Count, 2).End(3).Value
Range("c3").Value = a
b = Sheets("sayfa1").Cells(Rows.Count, 3).End(3).Value
Range("c5").Value = b
c = Sheets("sayfa1").Cells(Rows.Count, 4).End(3).Value
Range("c7").Value = c
End Sub

 

[kemal turan]

dosyanız ek' tedir

 

[esraf]

öncelikle tşk ederim yardımınız için.cehaletimi mazur görün ama kodu nereye yazacağımı bilmiyorum şimdiye kdar kod hiç kullanmadım (

 

[kemal turan]

merhaba,
sayfa adını gördüğünüz yerde sağ tuş yapın çıkan pencede "kod görüntüle" yi seçin çıkan kod bölümüne kodu yapıştırın.
sayfa2 yi her açtığınızda veriler güncelenecektir.
selametle kalın.

 

[esraf]

tşk ederim yardımınız için...elinize bilginize sağlık

 

[turist]

Alternatif olarak ekli dosyayı inceleyiniz.

 

[kemal turan]

merhaba,
Bildiklerimiz forumdaki üstadlarımızın emeğidir.
Selametle kalınız..

 

[esraf]

turist çok tşk ederim yine emeğini esirgemedin Allah razı olsun.bir dosya hazırlıyorum günlerdir ve birçok kısmını sizin yardımınızla hallettim.tekrar tşkler