labele resim ekleme

[limanC34]

Selam Arkadaşlar
Dosyadaki userformda labele resim eklemek istiyorum ama beceremedim.Siteden bir sürü eklenti yapmaya çalıştım olmadı tabi.Bu benim yapabileceğim birşey değil.yardım ederseniz sevinirim.
Teşekkürler.

 

[metinozlu]

Benzer bir çalışmam var.veriler silinmiştir.comboboxta seçilen kişiye ilşkin bilgiler ekrana gelmektedir. kodları incelersenkendi çalışmana uyarlıyabilirsin.

 

[limanC34]

Sayın metinozlu
İlginiz için teşekkür ederim ama beceremem açıkçası.Benzeri bir dosyada bende var ama sabahtan beri ne yaptımtıysam olmadı.
Saygılarımla.

 

[metinozlu]

resim.Picture = UserForm2.Controls("label" & ActiveCell(1, -1)).Picture

yukarıdaki kod resmi getirmektedir.
combobox kodlarını inceleyiniz.
ayrıca resimlerin depolandığı userform2 deki labellerin adı personel sicil nosudur.

 

[limanC34]

Sayın metinozlu
Kodların birleştirilme mantığını çözemem açıkçası.Sabahtan beri iki farklı dosyadan bir sürü kopyala yapıştır falan yaptım ama acemi olduğumdan yapamıyorum tabi.İlginize çok teşekkür ederim.

 

[limanC34]

Aslında C:\ den bir dosyadan resim çekebilme kodu lazım ama nereye nasıl eklenir bilmiyorum.

 

[metinozlu]

çalışmanıza örnek kod yazıp resim ekledim

 

[limanC34]

Olmadı üstadım
Hem verileri alırken eksik alıyor hemde tek combobox değil.Acemilik başa bela.Sabahtan beri kodları kese kese kasaba döndüm.Herşey için teşekkür ederim.

 

[limanC34]

Aslında bendede yanılmıyorsam Levent beyin kodlarıyla bir dosya var ama resim çekme satırlarını uyarlayamadım.

 

[Mdemir63]

Selamlar

Ben size resim getirmeyle ilgili bir dosya gönderiyorum. Sayın hocam Şaban Sertkaya'nın yardımlarıyla yapılmıştır. Sayfa 2 ye de resmi getiriyor. resim dosyasını mutlaka C nin içine kopyalayınız .Belki işinize yara kendinize uyarlayabilirsiniz.

Kolay gelsin

 

[limanC34]

Sayın komutan63
ALLAH RAZI OLSUN dolayısıyla Şaban Sertkayadan'da ALLAH RAZI OLSUN.
Ayrıca izlediğim kadar çoooooook uzun süre soruma ilgili olarak çözüm aradınız.Sabrınıza minnettarım.Buarada Sayın metinozlu'yada büyük dirençle çözüm üretmesinden dolayı ALLAH kendisindende RAZI OLSUN.
Dosyanın bitmiş hali ekte umarım işe yarar.
Saygılarımla.

 

[Mdemir63]

Selamlar,
Katkım olduysa ne mutlu bana, ama tabiki asıl katkı Şaban hocamın
sonuçta İşinize yaradığına sevindim.
İyi çalışmalar dilerim.

 

[karakash]

bence bu dosyaları gönderen arkadaşlar bir kez daha güncellemeliler.
faydalı bir çalışma çünkü