SETFOCUS

Katılım
24 Mayıs 2005
Mesajlar
462
Excel Vers. ve Dili
Excel 2003 Türkçe
Herkese selamlar,

Arkadaşlar Textbox1`e tarih girişi yapıyorum. Enter`e basınca eğer tarih hatalı ise mesaj ile uyarıyor ve Textbox1 içeriğini siliyor. Ancak, Textbox2`ye geçiyor.

Benim istediğim Textbox1 içeriği hatalı olduğu için mesajla uyarı vermesinden sonra silinmesi neticesinde imleçin Textbox1`de kalması.

Bunun için Textbox1.Setfocus şeklinde kod yazdım ama olmadı. :kafa:

Bu konuda bana yardımcı olursanız sevinirim. Saygılarımla
 
Katılım
24 Mayıs 2005
Mesajlar
462
Excel Vers. ve Dili
Excel 2003 Türkçe
Arkadaşlar, daha iyi anlaşılması için örnek dosya ekliyorum.

Yardımcı olursanız sevinirim. Saygılarımla :hey:
 
Katılım
24 Mayıs 2005
Mesajlar
462
Excel Vers. ve Dili
Excel 2003 Türkçe
Sayın isakarakus, cevabınız için çok teşekkür ederim. Örnek dosyadaki kodlar içerisinde cancel=true nereye yazmam gerek. Saygılarımla
 
Katılım
3 Mart 2005
Mesajlar
571
Excel Vers. ve Dili
Excel 2000 Ing.
textbox1 in exit olayına ,


[eğer veri tarih teğilse] Cancel=True
 
Katılım
3 Mart 2005
Mesajlar
571
Excel Vers. ve Dili
Excel 2000 Ing.
Kod şöyle...

[vb:1:dfcd321f43]Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)

If IsDate(TextBox1.Text) = False Then Cancel = True

End Sub[/vb:1:dfcd321f43]
 
Katılım
24 Mayıs 2005
Mesajlar
462
Excel Vers. ve Dili
Excel 2003 Türkçe
Sayın isakarakus, cevabınız için çok teşekkür ederim. :dua:

Şimdi anladım ve sorunum çözüldü. :mutlu:
 
Üst