textboxa tıklandığında msgbox açılsın

[efee2000]

merhaba arkadaşlar,

iki textboxum var ve ve textbox1_change olduğunda , textbox2 sheet1 den veri alıyor. textbox2 nin locked olayı false. dolayısıyla textbox2 değerini manuel değiştirebiliyroum. textbox2 nin değerini manuel değiştirirken, yani textbox2 ye tıkladığımda msgbox ile beni uyarsın ve veri değişince rengi mavi olsun istiyorum. textbox2_click() altında kodla denedim ama olmadı..

 

[Levent Menteşoğlu]

Mesaj için aşağıdaki gibi deneyin.

[vb:1:fc34c07fa3]Private Sub TextBox2_Enter()
MsgBox "merhaba"
End Sub
[/vb:1:fc34c07fa3]

Renk değişini içinde;

[vb:1:fc34c07fa3]Private Sub TextBox2_Change()
TextBox2.BackColor = vbBlue
End Sub
[/vb:1:fc34c07fa3]

 

[efee2000]

Teşekkürler sayın leventm,
verdiğiniz birinci kod işimi gördü. ikinci kodda ise textbox2 change() dediğimiz için sheet üzerindeki veriyi aldığında da mavi yaptı. benim amacım veriye manuel müdahale edildiğinde rengini mavi yapması idi. ama bunun cevabını da yine yazdığınız birinci kodda buldum.
TextBox2.BackColor = vbBlue kodunu
TextBox2_enter() altına eklemem yeterli oldu.


Sonsuz teşekkürler...

 

[Levent Menteşoğlu]

Aşağıdaki gibide olabilir.

[vb:1:69565007e9]Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
TextBox2.BackColor = vbBlue
End Sub
[/vb:1:69565007e9]