09/05/2020, 12:55
feraz
Alttaki içerisinde olarak arar.Baştaki "*" & bunları silerseniz başlahan olarak arar.
"*" & LCase(Me.ComboBox1.Value) & "*"
Dosyayı denedim önceki yazdığım yani başlayan olarak değiştirince çalışıyor.Ayrıca * bunu yazarsanız koda tümü listelenir ve *L olarak yazarsanız L içerenler listeleniyor.
Ayrıca alttaki kodu silebilirsiniz isterseniz combo boşsa listboxtta boş olsun diye eklemiştim.
"*" & LCase(Me.ComboBox1.Value) & "*"
Dosyayı denedim önceki yazdığım yani başlayan olarak değiştirince çalışıyor.Ayrıca * bunu yazarsanız koda tümü listelenir ve *L olarak yazarsanız L içerenler listeleniyor.
Ayrıca alttaki kodu silebilirsiniz isterseniz combo boşsa listboxtta boş olsun diye eklemiştim.
If Me.ComboBox1.Value = Empty Then Me.ListBox1.Clear