DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Bir örnek verirmisiniz comboboxtan neyi seçersek listboxta seçilecek satır o olsun.Bu arada sütun seçilemez,satır seçilebilir.![]()
mesela combobox da ALL-01-KK-14 secildigil zaman activite kodundaki ALL-01-KK-14 nin oldugu satır secilsin yani birinci satır.
Private Sub ComboBox1_Change()
If ComboBox1.Value = "" Then ListBox1.ListIndex = -1: Exit Sub
ListBox1.ListIndex = -1
For i = 0 To ListBox1.ListCount - 1
If ComboBox1.Value = ListBox1.Column(4, i) Then
ListBox1.ListIndex = i
Exit For
End If
Next i
End Sub
Dosyanız ektedir.
Kod:Private Sub ComboBox1_Change() If ComboBox1.Value = "" Then ListBox1.ListIndex = -1: Exit Sub ListBox1.ListIndex = -1 For i = 0 To ListBox1.ListCount - 1 If ComboBox1.Value = ListBox1.Column(4, i) Then ListBox1.ListIndex = i Exit For End If Next i End Sub