combobox'tan textbox' değer atama

[kimkey]

Arkadaşlar merhaba,
userform oluşturmayı sizlerin yardımıyla öğrenmeye çalışıyorum. forumdan takip ettiğim kadarıyla sayenizde çat pat bişeyler yapmaya başladım. fakat biyerde tıkandım. bi userform oluşturdum. combobox ve textbox var. combobox içerisinde 10 kişinin adı soyadı var. combobox dan seçtiğim kişilerin T.C. kimlik numaralarının textboxda gözükmesini istiyorum fakat yapamadım. yardımcı olursanız sevinirim.

 

[mustafaine1]

textbox1.value = combobox1.value denediniz mi?

 

[kimkey]

Sn. Mustafaine, verdiğiniz kodu yazdığımızda comboboxtaki değerin aynısını girmezmi. ben farklı isimler seçildiğinde o kişilere ait kimlikl numaralarını textbox a yazdırmak istiyorum. comboboxtan birini seçince onun kimlik numarası textboxa yazılsın, başka birini seçince onun kimlik no su yazılsın istiyorum. bunun içinde acaba "if" li bir kod mu yazıkması lazım. bir de bu kodlara ve kodların nasıl yazılacağı ile ilgili bilgye nereden ulaşabilirim?

 

[mustafaine1]

ama onlari nereye girdiginizi nerden bilicez neden dosya eklemiyorsunuz yardimci olmaya calisalim..

 

[kimkey]

Sn. Mustafaine, ilginiz için teşekkür ediyorum, dosyayı ekliyorum. combobox ta isimle gözüküyo seçim yapabiliyorum. data çalışma sayfasında da her ismin karşılığında kimlikl numarası var. isim seçtikçe o şahsın kimlik numarası gelsin istiyorum.

 

[mustafaine1]

Combobox1`in change olayina kodlari ekleyin lutfen..

isim = ComboBox1.Value
Set Data = Sheets("data")
TextBox1.Value = Application.WorksheetFunction.VLookup(isim, Data.Range("B:C"), 2, 0)

 

[mustafaine1]

Bu arada uzgunum buralardaydim ama foruma bakamadim uzun zamandir, bayagi gecikti sanirim cevabiniz..

 

[kimkey]

üstad teşekkür ederim. sayende bi ko daha öğrenmiş oldum, hallettim işimi.