Excel Formül Sorusu Sor

Bir Excel formülüne dair sorunuz varsa, bu alanı kullanarak bize iletin.

Excel Makro Sorusu Sor

Bir Excel VBA koduna dair sorunuz varsa, bu alanı kullanarak bize iletin.

Genel Excel Sorusu Sor

Excel'in ön sayfasındaki FORMÜL haricinde olan sorularınızı buradan sorabilirsiniz.

Çözüldü Texbox ile listviewde personel bul

sedat2161

Normal Üye

Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Hayırlı günler sayın hocalarım. Ekli dosyamdaki userformda ki bul texbox ı ile listviewde personel adına göre süzme yapmak istiyorum. Yardımlarınızı bekliyorum.
 

Ekli dosyalar

  • 45.xlsm
    1.8 MB · Görüntüleme: 2
Daha önce böyle bir kodum vardı uyarlamaya çalıştım hata veriyor yardımlarınızı bekliyorum.
Private Sub TextBoxBUL_Change()
'Arama için
Set s1 = ThisWorkbook.Sheets("GENEL BİLGİLER")
s1son = s1.Cells(Rows.Count, 1).End(2).Row
ListView1.ListItems.Clear: ListView1.Gridlines = True
With ListView1
For sat = 2 To s1son
For sut = 1 To 11
If CStr(s1.Cells(sat, sut)) = CStr(Me.TextBoxBUL) Or InStr(1, s1.Cells(sat, sut), TextBoxBUL, vbTextCompare) > 0 Then
i = ListView1.ListItems.Count + 1
.ListItems.Add , , s1.Cells(sat, 2)
For ekle = 1 To 11: .ListItems(i).SubItems(ekle) = s1.Cells(sat, ekle + 2).Text: Next
Exit For
End If
Next
Next
End With
End Sub
 

Ekli dosyalar

  • Ekran Alıntısı.webp
    Ekran Alıntısı.webp
    28.8 KB · Görüntüleme: 3
DMCA.com Protection Status
Konuyu başlatan
Normal Üye
Katılım
Konu Bilgi
Durum
Çözüldü 
Forum
Excel Makro Soruları
Başlangıç tarihi
Son yanıt tarihi
Cevaplar
5
Geri
Üst