Tamam ustam kızmayın. Örnek dosyayı yüklüyorum.
atoykan ustadan kaçayım derken berduş ustama yakalandım.
Dosya ekte sunulmuştur ustam
Ustam Okullar sayfasının A sütununda "Seçildi" yazılan var ise "B" sütununda ki isimler listbox2 de listelenmesini rica ediyorum
mesajımda kızgınlık yok, sadece nedenini açıkladım çünkü yanılmıyorsam dosyanızı eklemeniz konusunda daha öncede uyarılmıştınız ama yine eklemediniz (yani aslında kızmaya hakkım da var ama artık çok kızmıyorum; eğer soru sahibi kendi sorununa gerekli önemi verip dosyasını eklemiyorsa ben neden sinirleneyim ki onun sorununu çözmek için). ben de daha net ifadelerle dosyaya ihtiyacımızın sebebini açıkladım o kadar
Ustam kızdığınızı düşünmedim bile. Yanlışa mahal vermeyelim. Sizler baş tacısınız.
Dosyayı mobilen inceleyebildim.
Kodu kafadan yazdım mantık alttaki gibi olacak.
Sayfa isimlerini felan eklersiniz cells önüne artık
Mobilden zor oluyor ama mantık bu en basiti.
For i = 1 to 125
Listbox2.clear
İf cells(i,1).value= "Seçildi" then
Listbox2.additem cells(i,2).value
Next