Sayın Leventm Bey çok teşekkür ederim. Elinize sağlık.
İki Sorum daha olacak yardımcı olursanız sevinirim.
1-Verdiğiniz kodları Listbox3 ye aldım. Listbox1 e Comboboxa göre veri alıyorum. Sizin Fomülünüzle listbox3 e sabit veri alıyorum. Listbox1 Dolu olduğu zaman Listbox3 e veri gelsin boş olduğunda ise veri gelmesin.
2-Bu kodlarlada listbox2 veri alıyorum. Ayni Ãekilde listbox1 boş olduğunda veri gelmesin dolu olduğunda listbox2 e veri gelsin.
Private Sub ListBox1_Click()
ListBox2.Clear
Satır = Sheets("Sayfa1").[c7:c500].Find(ListBox1).Row
ListBox2.AddItem "" & Sheets("sayfa1").Cells(Satır, 13)
ListBox2.AddItem "" & Sheets("sayfa1").Cells(Satır,14)
ListBox2.AddItem "" & Sheets("sayfa1").Cells(Satır, 15)
End Sub
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.