comboboxla isim seç resmi gelsin

[limanC34]

Selam Arkadaşlar
Sitede baya bir bakındım ama ben acemi olduğumdan resim işi baya zor geldi bana.Kimi çözümlere aklım ermedi kimi çözümlerde işimi görmedi.Kısaca ekteki gibi resmi bir kurumda memurun özlük bilgilerine bakarken aklım sıra eklediğim labelde(tabiki bu arada nesne seçimim yanlışta olabilir) comboboxtan isim değiştikçe anında resimde değişirmi?
Teşekkürler.

 

[limanC34]

Arkadaşalar pardon dosyayı şimdi ekleyebildim.

 

[Orion1]

Comboox!a tuklayınca İmage Nesnesinde(Label değil) C:\Test dizininde comboboxta ki değer ile jpg uzantılı dosyayı görebilirsiniz.
Mesela ALİ VELİ 1 'i seçtiğinizde resmi görebilmeniz için C:\Test klasöründe ALİ VELİ 1.jpg adlı resim dosyasının olması gerekiyor.
Ekli dosyayı inceleyiniz.
Kırmızı ile yazılmış kodlar ilave edildi.

Private Sub ComboBox1_Change()
Set s1 = Sheets("ÖZLÜK")
sat = s1.Columns(1).Find(ComboBox1.Value).Row
TextBox1.Value = s1.Cells(sat, 2).Value
TextBox2.Value = s1.Cells(sat, 3).Value
TextBox3.Value = s1.Cells(sat, 4).Value
TextBox4.Value = s1.Cells(sat, 5).Value
s1.Cells(sat, 1).Select
On Error Resume Next
[COLOR="Red"]Image1.Picture = LoadPicture("")
Image1.Picture = LoadPicture("C:\Test\" & ComboBox1.Value & ".jpg")[/COLOR]
End Sub

 

[limanC34]

Sayın orin2
Sağolun ama kafam baya karıştı.c 'de Test dosyası yaptım ama yine olmadı.Sayın hocam bakınız isterseniz şöyle yapalım.Siz benim dosyamda örnek oluşturun yada açıkçası valla kafam iyice karıştı zaten zor şer anlamaya çalışıyorum pes etçem artık.Ben bu resim işine bayadır bakıyom.Sokaktaki adama göre bir çözüm yada yorulmayın benimle.
SAYGILARIMLA.

 

[Orion1]

1- C 'de Test klasörü oluşturunuz.
2- C:\Test klasörü içine ALİ VELİ 1.jpg isimli bir resim dosyası atınız.
3- Combobox'tan ALİ VELİ 1 ismini seçiniz.
Şimdi image nesnesinde test klasörüne attığınız resim gözükecektir.

 

[limanC34]

Sayın orion2
Emin olunki artık yok olamaz demiştim.Teşekkür edemem yetmez biliyorum.ALLAH razı olsun.Şunada eminimki bu çözümünüz kıvranan tüm arkadaşlara MUAZZAM bir örnek.
Saygılarımla.

 

[Orion1]

Sayın orion2
Emin olunki artık yok olamaz demiştim.Teşekkür edemem yetmez biliyorum.ALLAH razı olsun.Şunada eminimki bu çözümünüz kıvranan tüm arkadaşlara MUAZZAM bir örnek.
Saygılarımla.

Rica ederim.
İyi çalışmalar.