Texbox'taki veri direk hücreye

[boss2090]

Asagidaki kod da Userform icindeki Texbox 1 girdigim sayiyi Sayfa 3 de c23 hücresine aynen nasil akatarabilirim.


Private Sub ComboBox3_Change()
If TextBox1.Value < 40 And ComboBox3.Value = "S 235" Then
TextBox2.Value = 360
TextBox3.Value = 0.8
Range("c24").Value = "S 235"
Range("c25").Value = 360
Range("c26").Value = 0.8
End If
End Sub

 

[İhsan Tank]

Asagidaki kod da Userform icindeki Texbox 1 girdigim sayiyi Sayfa 3 de c23 hücresine aynen nasil akatarabilirim.


Private Sub ComboBox3_Change()
If TextBox1.Value < 40 And ComboBox3.Value = "S 235" Then
TextBox2.Value = 360
TextBox3.Value = 0.8
Range("c24").Value = "S 235"
Range("c25").Value = 360
Range("c26").Value = 0.8
End If
End Sub

merhaba

Private Sub TextBox1_Change()
Sheets("[COLOR="Red"]Sayfa3[/COLOR]").Range("C23") = TextBox1.Text
End Sub

bu kod işinizi görür sanırım.
kırmızı yeri kendinize göre uyarlayınız

 

[boss2090]

Tesekkürler hocam süpersin!!!!!
Bana ait konular yada sordugum sorulari ayni anda nasil görebilirim.

 

[İhsan Tank]

Tesekkürler hocam süpersin!!!!!
Bana ait konular yada sordugum sorulari ayni anda nasil görebilirim.

rica ederim
üstten hızlı linkler - abone olunan konular'a tıklarsanız görebilirsiniz
:yazici: