ComboBox da listeleme

[Mesafe]

İki combobox olan bir userformda bir combobox ile excel listede bulunan numaraları seçiyorum. Aynı numarada listede birkaç fiş numarası oluyor, diğer comboboxda da sadece bu numaraya ait fişlerin gelmesini istiyorum.
Dosya içerisine de ayrıca açıklama yazdım.

 

[turk-x]

Merhaba;

Combobox1_Change() kodunuzun altına Aşağıdaki kodu Ekleyin.

For i = 2 To [Sayfa1!D65536].End(3).Row
If s.Range("D" & i) = ComboBox1.Value Then ComboBox2.AddItem s.Range("L" & i)
Next i

 

[Mesafe]

Hocam ilginiz ve yardımınız için çok teşekkür ederim. Bu ilave ile istediğim gibi oldu. Yanlız bir şey daha öğrenmek istiyorum, hocam bu listeler her zaman aynı sütun sırası ile gelmiyor ama sütun başlıkları aynı oluyor.
Sizin kodda bulunan "D" yerine başlığında Numara yazan sütunu
"L" yerinede başlığında Fiş yazan sütunu almasını sağlamak için nasıl bir ilave yapılması gerekir.
Teşekkürler

 

[Mesafe]

Konuyla ilgilenen olursa sevinirim.
Teşekkürler