"*" & 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