Combobox İle Seç ve Getir

[Hsn55]

İyi akşamlar;
Ekli dosyada tebliğ sayfasındaki Combobox1 ile veri girişi sayfasındaki d4:d500 hücre arasındaki ismi seçtiğimizde seçilen isimlerin karşısındaki Ünvan ve Görev Yerini TextBox1 ve Combobox2 ye gelebilir mi?

İndir Tebliğ1

Dosyayı indir Tebliğ1

dosya.co

 

[Korhan Ayhan]

Deneyiniz.

Harici Link (Silinebilir) ; https://dosyam.org/Wmz/Tebliğ1.xlsm

 

[Hsn55]

Korhan bey çok teşekkür ederim. eğer alta bir adet Textbox ekleyince ve veri girişine bir sütun daha ekleyince kodu aşağıdaki gibi yapıyorum hata veriyor. Nasıl yapmam gerekiyor ?

Private Sub ComboBox1_Change()
    TextBox1.Value = ComboBox1.Column(1)
    ComboBox2.Value = ComboBox1.Column(2)
    TextBox2.Value = ComboBox1.Column(3)
End Sub

 

[Korhan Ayhan]

Combobox1 nesnesinin özellikler bölümünden ListFillRange kısmındaki adresi ve ColumnCount kısmını güncellemeniz gerekiyor.