Textboxlarda uyarı

[Kemal Demir]

İyi Günler Arkadaslar

Yenı başlık İçin Ã?zürdilerim Ama aradığımı bulamadım yada tam arayamadım,,

Hazırlanmıs olan userform içerisinde Textboxllara girilen değerin aynı kolon içerisnde tekrar yazılmasını durumunda Bir ikaz vermesini ve kaydı yapmamasını istiyorum

Yetersiz kaldım yardımlarını bekliyorum Simdiden EMekler İçin saolun

SayGılaR

Ã?rnek

1.)Textbox2 girdiğim değer Sayfanın a kolonuna yazıyor bundan once aynı değer varsa uyarı verip ilave edilmemesini istiyorum
2.) Textbox1 e girdiğim değer
***
Sheets.Add
ActiveSheet.Name = TextBox1.Value
TextBox1.Value = ""
***
nasıl bir ilave yapmam gerekir aynı isimli sheet açmaması için varsa msg versin

SaygıLar

 

[Levent Menteşoğlu]

1.sorunuz için aşağıdaki kodu deneyin.

[vb:1:f7481b9e22]say=worksheetfunction.countif(columns(1),textbox2.value)
if say>0 then
msgbox "bu veri mevcuttur"
textbox2=""
textbox2.setfocus
end if[/vb:1:f7481b9e22]

2.sorunuz için hata değerlendirmesi yapın.

[vb:1:f7481b9e22]on error goto 10
Sheets.Add
ActiveSheet.Name = TextBox1.Value
TextBox1.Value = ""
.
.
10 msgbox "hatalı isim"
[/vb:1:f7481b9e22]

 

[Kemal Demir]

teşekkürler