ListBoxda seçilen sınıfta bulunan öğrencileri diğer Listboxta sıralama

[sdegirmenci]

Ekteki dosyamda Form üzerindeki iki adet ListBox var,
Sınıf Litbox' ında her hangi bir sınıf seçtiğimde o sınıfta
bulunan öğrencilerin Diğer ListBox' sıralanmasını istiyorum, Yapmaya çalıştım ama başarılı olamadım.
Bu konuda yardımcı olabilirseniz sevinirim. Saygılarımla

 

[halit3]

kod:

Private Sub sınıf_Click()
isimler.Clear
For r = 5 To Cells(Rows.Count, "d").End(3).Row
If sınıf.Value = Cells(r, "D").Value Then
isimler.AddItem Cells(r, "e").Value
End If
Next r
End Sub

 

[sdegirmenci]

Merhaba
Halit Hocamın kodlarını ekledim, Tam istediğim oldu ancak Bu seferde Öğrenci ismini seçtiğimde adısoyadı Text Box'ına yazdırmak istiyorum. Forumda bu konuda yazılan kodları denedim, ancak seçtiğm isim değilde başka sıradaki bir isim Adısoyadı Text BOX2ına yazılıyor. Bu konuda tekrar yardımcı olabilirseniz sevinirim. Dosyamı yenileyerek 1.Mesajıma tekrar ekliyorum. Saygılarımla