Sayfa1 deki hucreyi UserForm,daki textbox,a aktarma

[Jezus]

Herkese merhaba

Sayfa1 de hucre icindeki veriyi UserForm,daki textbox,a nasil aktarma yapabilirim

Simdiden tesekkurler arkadaslar

 

[excellium]

örnek olarak:

[vb:1:b077ae3108]texbox1.value = sayfa1.range("a1").value[/vb:1:b077ae3108]


bu geliştirilebilir

 

[Jezus]

Merhaba excellium

sende benim gibi uykusu kacanlardansin sanirim
Cevabin icin tesekkur ederim bu verdigin formulu nereye yazacagim..?

Selamlar

 

[Jezus]

bu sekilde yazdim dogrumu..?

Private Sub TextBox1_Change()
texbox1.Value = Blad1.Range("D1").Value
End Sub

 

[Levent Menteşoğlu]

Aşağıdaki iki şekilden birini tercih edin.

Textboxun enter olayına yazılabilir.

[vb:1:ace2ce0ce5]Private Sub TextBox1_Enter()
TextBox1 = Blad1.Range("d1").Value
End Sub
[/vb:1:ace2ce0ce5]
Userformun initialize olayına yazılabilir.

[vb:1:ace2ce0ce5]Private Sub UserForm_Initialize()
TextBox1 = Blad1.Range("d1").Value
End Sub
[/vb:1:ace2ce0ce5]

 

[Jezus]

Levent hocam yine imdadima sen yetistin cok sagol elimdeki prog. bitince site,ye sifresiz olarak " iade " edecegim neden iade..? cunku bu yaptiklarimiz sizin yardimlarinizla oluyorsa bitirincede yerine iade etmek en dogru hareket olacaktir diye dusunuyorum.
Lutfen bu yazdiklarimi ne yagcilik olarak nede pohpohlama olarak algilamayin ben icimden gelenleri yazdim degerlendirmesi size kalmis.

Selamlar

Jezus

 

[Levent Menteşoğlu]

Güzel düşünceleriniz için teşekkür ederim. Sözlerinizi kendime değil tüm foruma yönelik olarak kabul ediyorum. Yanlış anlaşılacak bir durum sözkonusu değildir. Çalışmalarınızı paylaşmanız elbette bizim en büyük mutluluğumuzdur.