bulunan plakaya göre seçim

Katılım
14 Kasım 2004
Mesajlar
297
Excel Vers. ve Dili
microsoft office professional plus 2016
arkadaşlar hepinize iyi günler, problemimi yazdım inşaallah anlaşılır yazmışımdır

userform üzerinde bulunan textboxlardan excel hücrelerine veriler giriyorum. textbox7 den excel hücrelerine plakalar giriyorum. (ihaleyi alan firmanın 50 kamyonun listesi excel "plaka" sayfasında a1:a50 arasında kayıtlı) texbox7 ye öyle bir kod yazmalıyızki exceldeki plaka sayfasında kayıtlı olmayan plakayı yazdığımda bu plaka kayıtlı değildir diyerekten uyarı mesajı gelsin eğer plaka kayıtlı ise hiç bir uyarı mesajı gelmeden kayıt etsin. Ben textboxun enter olayına bul kodunu yazmaya çalıştım ama yapamadım. yardımlarınız için teşekkürler
 
Katılım
14 Kasım 2004
Mesajlar
297
Excel Vers. ve Dili
microsoft office professional plus 2016
yardım

arkadaşlar yardımlarınızı bekliyorum
 

kulomer46

Altın Üye
Katılım
23 Mart 2007
Mesajlar
1,514
Excel Vers. ve Dili
Microsoft Office LTSC Professional Plus 2021 - Türkçe
Altın Üyelik Bitiş Tarihi
08-06-2027
Çalıştığınız dosyayı gönderiniz, üzerinde çalışalım.:)
 

veyselemre

Özel Üye
Katılım
9 Mart 2005
Mesajlar
3,651
Excel Vers. ve Dili
Pro Plus 2021
Kod:
Private Sub TextBox7_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    Set wf = WorksheetFunction
    On Error Resume Next
    BUL = wf.Match(TextBox7.Text, [a1:a50], 0)
    If Err <> 0 Then
        MsgBox "Plaka Bulunamad&#305;." & vbCr & TextBox7.Text
        Cancel = True
        TextBox7.SetFocus
    End If
End Sub
 
Katılım
14 Kasım 2004
Mesajlar
297
Excel Vers. ve Dili
microsoft office professional plus 2016
teşekkür

sayın veyselemre teşekkür ederim. tam istediğim gibi oldu. elinize sağlık.
 
Üst