combobox taki hataya müdahale

[ugurakin]

ilişikte küçük bir çalışmam var. kişinin ismini girdiğinizde banka hesap no' sunu öğreniyorsunuz. combobox un matchrequired seçeneğini TRUE yaptım, combobox a girdiğim kayıt listemde yoksa ekteki 2.dosyanın görüntüsünü alıyorum (hata mesajı). bu mesajı istediğim şekilde düzenleyebilir miyim? yada bir başka yöntemi var mı?

 

[ugurakin]

ikinci görüntü yü ekliyorum

 

[Levent Menteşoğlu]

Bu mesajı düzenleyemezsiniz, fakat kendiniz bir mesajbox ile farklı bir uyarı oluşturabilirsiniz. Aşağıdaki kodu comboboxa kopyalayarak deneyin.

Private Sub ComboBox1_Change()
On Error Resume Next
If ComboBox1 = "" Then Exit Sub
TextBox1 = ""
TextBox1 = Sheets("HesapNo").Cells(ComboBox1.ListIndex + 1, 3)
TextBox1.Value = Format(TextBox1, "00000000")
If ComboBox1.ListIndex = -1 Then
MsgBox "GEÇERSİZ DEĞER"
ComboBox1 = ""
ComboBox1.MatchRequired = False
End If
End Sub

 

[ugurakin]

aradığım da buydu, teşekkürler.