hücre değerini düğme ile sayfa2 ye nasıl kaydedebilirim?

[pitsss]

arkadaşlar,iki sorum olacak
1-
ekteki dosyada açıklama giriş çıkış var.
ben buraya değerleri girdikten sonra düğme1 düğmesine basınca bu girdiğim değerler sayfa2 de sırayla yazılsın isitoyurm. bunu nasıl yapabilirim?
mesela bunları yaptım.düğme1 e bastım. girşoldu. ikinci kaydım için bilgileri gireyim. yine düğme1 e basayım. ve yine sayfa2 de kayıt yapsın sırayla ( alt alta gelecek şekilde)bunu nasıl yapabilrm?
2-
farzadelimki sayfa2 ye ben verilerimi düğme1 ile yazdırabildim. sonra bu sayfa2 deki verilerimi sayfa 1 de bulunan liste kutusunda nasıl görüntüleyebilirim?

cevap veren herkese şimdiden teşekkürler.

 

[zafer]

Merhaba

Ekli dosyayı inceleyiniz.

 

[pitsss]

Merhaba

Ekli dosyayı inceleyiniz.

Zafer bey çok teşekkür ederim. Tam istediğim gibi olmuş.
Fakat liste kutusuna herhangi bir değişiklik yapamıyorum. düğme3 ü sağ tıklayınca özellikleri geliyor ama. liste kutusnda bunu yapamıyorum.nedeni ne olabilir acaba?

 

[kulomer46]

1 sorun için cevap :
sayfa 1 deki düğmeye aşağıdaki makroyu ata

Sub OK()

kac = Sheets("SAYFA2").[A65500].End(3).Row + 1
Sheets("sayfa2").Cells(kac, 1) = Sheets("sayfa1").Cells(5, 3)
Sheets("sayfa2").Cells(kac, 2) = Sheets("sayfa1").Cells(5, 4)
Sheets("sayfa2").Cells(kac, 3) = Sheets("sayfa1").Cells(5, 5)

End Sub
2 sorun için uğraşıyorum bulursa gönderirim..başarılar..

 

[kulomer46]

zafer beyin cevabı gerçekten güzel, yalnız oluşan listbox kutusunu sayfa 2 ile nasıl bağlantılı yapmış anlayamadım. listbox un üzerine geliyorum tıklıyorum hiç bir değişiklik olmuyor ayar kısmına giremiyorum, yardım ederseniz sevinirim..

 

[pitsss]

1 sorun için cevap :
sayfa 1 deki düğmeye aşağıdaki makroyu ata

Sub OK()

kac = Sheets("SAYFA2").[A65500].End(3).Row + 1
Sheets("sayfa2").Cells(kac, 1) = Sheets("sayfa1").Cells(5, 3)
Sheets("sayfa2").Cells(kac, 2) = Sheets("sayfa1").Cells(5, 4)
Sheets("sayfa2").Cells(kac, 3) = Sheets("sayfa1").Cells(5, 5)

End Sub
2 sorun için uğraşıyorum bulursa gönderirim..başarılar..

Değerli Kulomer46 cevabınız için teşekkür ederim. çok sağolun..

 

[kulomer46]

ben teşekkür ederim..
karşılıklı faydalı olabilmek gerçekten çok güzel..
bu güzel sitede tüm Türkiyeden ve dünyadan Excel sevenler olarak biraraya gelebilmek gerçekten çok güzel..
Tüm emeği geçenlere teşekkürler..

 

[pitsss]

zafer beyin cevabı gerçekten güzel, yalnız oluşan listbox kutusunu sayfa 2 ile nasıl bağlantılı yapmış anlayamadım. listbox un üzerine geliyorum tıklıyorum hiç bir değişiklik olmuyor ayar kısmına giremiyorum, yardım ederseniz sevinirim..

cevabını buldum.Şöyle ki denetim araç kutusunu aktif hale getiriyoz( üst kısımda sağ tıklayıp)
sonra orada bulunan cetvel li ikonu tıklıyoruz. ve böylece tasarım moduaktif oluyor.
sonra liste kutusunu sağ tıklayıp özellikler diyoruz.Listfillrange seçeneğinin karşısına görünmesini istediğimiz aralığı yazıyoruz .( mesela :kasadetay!A1:E1000 yada sayfa1!A1:E1000 gibi)sonrada column count yazan yere verdiğimiz değere göre bize liste kutusunda kaç tane sütün göstereceğini belirliyor.
umarım açıklayıcı bir bilgi olmuştur. Teşekkürler. kolay gelsin..

 

[kulomer46]

anlattığınızı anladım çok faydalı oldu, teşekkürler...