himmgarip
Yeni Üye
Listbox üzerindeki sayfaları textbox ile aratıyorum. Bu aramayı dinamik olarak her harf yazdığımda süzerek yapmasını istiyorum. Konu hakkında yardımcı olabilecek var mı acaba?
Kullandığım kod aşağıdaki gibidir. Bu kod sadece yazdığım ismi bulup mavi olarak işaretliyor.
Kullandığım kod aşağıdaki gibidir. Bu kod sadece yazdığım ismi bulup mavi olarak işaretliyor.
Private Sub txtArama_Change()
Dim x As Long
For x = 0 To lstMüşteriler.ListCount - 1
If Left(txtArama.Value, Len(txtArama.Value)) = Left(lstMüşteriler.List(x, 0), Len(txtArama.Value)) Then lstMüşteriler.Selected(x) = True: Exit For
Next
End Sub