Combobox'tan Başka Combobox'a Oradan Textbox'a Veri Aktarma

[cortese]

Merhaba !

Arkadaşlar buradan faydalandığım örneklerden yola çıkarak bir form oluşturdum.Aşağıdaki örnek dosyadan da anlayacağınız gibi sicil numaralarının yer aldığı bir combobox oluşturdum.Sicil numarasını girdiğim zaman başka bir combobox'a hasta isimlerini taşıyabiliyorum.Ancak istediğim buradan da hasta ismini tıkladığım zaman esicilno isimli textbox'a ilgilinin emekli sicil numarasının gelmesini istiyorum.Bazı örnekleri inceledim ama işin içinden çıkamadım.Yardımcı olursanız sevinirim.Teşekkürler...

 

[Tankut SAZLI]

Arkadaşım;
veri sayfasında birkaçtane sicilno yazan sütun var hangisinden alacağını belirtmemişssin,esicil 1 sütunundan aldırdım.Artık sen kendine göre ayarlarsın.

Private Sub hastaisim_Change()
On Error Resume Next
Sheets("veri").Select
esicilno.Value = Cells(sicilno.ListIndex + 2, 10)
End Sub

Bu koduda sicilno_Change e ekleki sicil no değiştiğinde temizlensin.

esicilno.Text = Empty

____________________
DİĞER ÇALIŞMALAR

ACCESS GÖRSEL EĞİTİM
USERFORM GÖRÜNÜMLERİ
ÖĞRENCİ TAKİP PROGRAMI(Excel ile Access VeriTabanı Uygulaması)
KİMLİK SORGULAMA(web üzerinden)
LİSTVİEW UYGULAMASI
BİLDİRİM ALANINA MİNİMİZE(VB6)
____________________

 

[cortese]

Arkadaşım;
Yazdığınız kodu kopyalayıp yapıştırdım.Ancak Hasta isimlerinden hangisini seçersem seçeyim Emekli sicil no aynı kalıyor.Yani hep esicil 1 numarasını getiriyor. Benim istediğim veri sayfasında göreceğiniz gibi Yakın 1'in emekli sicil numarası esicil 1, Yakın 2'nin emekli sicil numarası esicil 2 , yakın 3'ün emekli sicil numarası esicil 3..... olacak şekilde olmalı. Umarım anlatabilmişimdir.