listview string kararterde sorun

[emrexcel123]

arkadaşlar ve üstadlar selamlar
listview de verileri tablodan aldıktan sonra textbox ile arama yaptırıyorum ve yanındaki checkboxlar işaretleniyor fakat metinleri olduğu gibi arama yapıyor mesela : listview'in 3.satırında Akbank yazıyor,textbox'a akBaNk yazdığımda arama metnini kabul etmiyor bunun ile ilgili ne yapılabilir dosya ektedir yardımcı olacak arkadaşlara teşekkürler ii akşamlar...

 

[Levent Menteşoğlu]

Ara butonundaki kodu aşağıdaki ile değiştirin.

Private Sub CommandButton1_Click()
Dim dgr As String
With ListView1
.SetFocus
dgr = TextBox1.Text
For i = 1 To .ListItems.Count
.ListItems(i).Checked = False
For x = 1 To Len(.ListItems(i))
If [B][COLOR=red]UCase([/COLOR][/B]Mid(.ListItems(i), x, Len(dgr))[B][COLOR=red])[/COLOR][/B] = [B][COLOR=red]UCase([/COLOR][/B]dgr[B][COLOR=red]) [/COLOR][/B]Then
.ListItems(i).Checked = True
.ListItems(i).Selected = True
.ListItems(i).EnsureVisible
End If
Next
Next
End With
End Sub

 

[emrexcel123]

sn leventm hocam çok teşekkürler yine tecrübenizi gösterdiniz peki hocam listview üzerindeyken yani listview.setfocus iken (yanlış anlamayın ifadeyi bilmiyorum) yazmaya başladığımızda yazılan metne göre arama yapıp seçiyor herhangi bir kod gerektirmeksizin, peki hocam bunu istenilen herhangi bir kolon için yapabilirmiyiz ii akşamlar...

 

[Levent Menteşoğlu]

Nereye yazdığınızda arama yapılıyor anlayamadım.

 

[emrexcel123]

hocam özür dilerim anlatamadım galiba
şimdi hocam listview i açıp seçtikten sonra listede en solda yer alan sütundaki herhangi bir ismi yazmaya başladığınızda otomatik seçmeye başlıyor.bunu ilk sütunda yapıyor yapmak istediğim diğer sütunlar için nasıl uygulayabiliriz. hocam yanlış anlamayın kendimi ifade edemiyorum...

 

[Levent Menteşoğlu]

Sanıyorum diğer sütunlarda böyle bir işlem yapılamıyor.