Userform üzerinden Resim Değiştirme

[İsmail Küçükşengün]

Merhabalar;

Forumdaki örnekler sorunumu çözemedi.

Excel dosyası ile resimler klasörü aynı klasör içinde.

Userform2. deki resmi, userform1.üzerinden nasıl değiştirebiliriz.

Çalışma ekte olup, geniş açıklama da içindedir.

Yardımcı olacaklara şimdiden teşekkürlerimi sunuyorum.

 

[alpi]

Üçümcü bir alternatif olarak aşağıdaki kodu deneyin

Aşağıdaki kodu "Form Resmini Değiştir" düğmesinin _click olayına ekleyin

Dim DosyaAdı As String
DosyaAdı = Application.GetOpenFilename("Resim Dosyaları,*.bmp;*.jpg;*.jpeg;*.gif", 1, "Aç", , False)
Me.Picture = LoadPicture(DosyaAdı)

 

[İsmail Küçükşengün]

Sayın alpi;

İlginize teşekkür ederim.

Fakat değiştirdiğimiz resim, dosyayı kaydedip kapattığımızda ve yeniden açtoğımızda gözükmüyor, yine eski resim duruyor.

Bu sorunu nasıl çözebiliriz.

Selam ve Saygılarımla,

 

[ugur_engine]

userforma resim eklemek ve eklediğim resme tıkladığımda da bu resmin değişmesini sağlamak istiyorum.... mesela turuncu bir kutuya tıkladığımda kırmızı olmasını kırmızı bir kutuya tıkladığım da da bunun yeşil olmasını istiyorum... bunu nasıl yapabilirim teşekkürler...