Excel Sayfasına resim ekleme

[metinozlu]

Merhaba
bir çalışmam var.Programda Userform2 içindeki label lerde resimler depolanmış durumda.Userform1 de ise isimleri ve diğer dataları çagırdığım bölüm var.dataları rapor sayfasına aktarıp çıktı alabiliyorum.Ancak seçilen resmi rapor sayfasına aktaramadım.
Ekrana gelen resmi rapor sayfasına aktaracak kod konusunda yardımcı olursanız memnun olurum.
iyi çalışmalar.

Çalışma taslağı ektedir.

 

[metinozlu]

2 gündür bekliyorum.üstadlar yardım edebilirmi? mutlaka bir çözümü olmalı

 

[metinozlu]

exceli programlıyanlar,bu problemide çözmüşlerdir. yanıtları bekliyorum

 

[hamitcan]

Rapor sayfasına bir "Image" nesnesi ekleyin. Ve aşağıdaki satırı koda ekleyin.

Sheets("rapor").Image1.Picture = UserForm2.Controls("label" & ActiveCell(1, 0)).Picture

 

[metinozlu]

sayın hamitcan
Teşekkür ederim kod için.Denedim istediğim sonucu veriyor.sağolun.