D sütununda bankalar E sütununda da şubeleri var. A1 hücresinde Garanti Bankasını seçtiğim zaman B1 hücresinde Garanti Bankasının şubelerini çıkmasını istiyorum. Yardımcı olursanız sevinirim.
Sub listele()
isim = Sheets("sayfa1").Range("a2")
b = WorksheetFunction.CountA(Sheets("sayfa1").Range("d:d"))
For i = 1 To b
If Cells(i, 3).Value = isim Then
c = c + 1
Cells(c, 2) = Cells(i, 4)
End If
Next
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.
