Klasörden Resim ActiveX Denetimi Çekme

Rizelli3 · 27 Şub 2021

Merhabalar,

Elimde bir dosya var c:\resim\ klasörü içerisinden belirli hücrelere resim çekmesi gerekiyor ancak çalışmıyor kullanılan kod ve örnek dosya aşağıdadır.
Özet: Örnek dosyada D1 hücresindeki uzantıda bulunan resmi C3 hücresinde bulunan kutu içerisine çekmesini istiyorum.
Amaç: C3 hücresindeki kutuyu farklı sayfalarda farklı kısımlara kopyalayacağım tek seferde resimlerin tamamının değişmesi.
Şimdiden yardımlarınız için teşekkürler.

Kod:

İndirmek için giriş yapmanız gerekmektedir.
(13 satır)

Ömer BARAN · 27 Şub 2021

Merhaba, foruma hoşgeldiniz Sayın @Rizelli3 .

Şöyle deneyin.

VBA:

İndirmek için giriş yapmanız gerekmektedir.
(9 satır)

Rizelli3 · 27 Şub 2021

Ömer BARAN' Alıntı:
Merhaba, foruma hoşgeldiniz Sayın @Rizelli3 .

Şöyle deneyin.

VBA:

İndirmek için giriş yapmanız gerekmektedir. (9 satır)

Merhabalar desteğiniz ve zaman ayırdığınız için öncelikle teşekkür ederim. verdiğiniz kodu denedim ancak "Image1" kutusu içerisine klasörden resmi çekmiyor neyi yanlış yapıyorum anlamadım.

Ömer BARAN · 27 Şub 2021

Resimin YOL ve uzantı dahil ADI,
koddaki yoluzanti aynı ise sorun olmaması gerekir.
Ben kendi bilgisayarımdaki bir resimi yol ve isim bilgisini kullanarak denemiştim.
Bir soruna rastlamadım.
Olmazsa D1 deki dosya adını formülle değil elle yazarak bir kez daha deneyin.
Başta, ortada, sonda BOŞLUK durumuna dikkat edersiniz.

Rizelli3 · 27 Şub 2021

Ömer BARAN' Alıntı:
Resimin YOL ve uzantı dahil ADI,
koddaki yoluzanti aynı ise sorun olmaması gerekir.
Ben kendi bilgisayarımdaki bir resimi yol ve isim bilgisini kullanarak denemiştim.
Bir soruna rastlamadım.
Olmazsa D1 deki dosya adını formülle değil elle yazarak bir kez daha deneyin.
Başta, ortada, sonda BOŞLUK durumuna dikkat edersiniz.

Maalesef hocam D1 hücresindeki yolu elle girdim denedim sonuç yine aynı hücre içerisindeki yolu kopyalayıp bilgisayardaki klasöre yapıştırınca resim çıkıyor resim yolu ve uzantısı doğru ancak çekmiyor eğer mümkünse denediğini excel dosyasını paylaşabilir misiniz. Teşekkürler iyi forumlar dilerim.

Ömer BARAN · 27 Şub 2021

Bilgisayarda değilim.
Koddaki [D1].Text yerine [D1].Value yazarak deneyin.

Rizelli3 · 27 Şub 2021

Ömer BARAN' Alıntı:
Bilgisayarda değilim.
Koddaki [D1].Text yerine [D1].Value yazarak deneyin.

Maalesef hocam denedim sonuç aynı resmi çekmiyor. Benim bilgisayar yada excel ayarı ile ilgili bir durum olabilir mi bu kodun çalışması için ekstra bir ayar yapmam gerekiyor mu. Tüm makroları etkinleştir ve Tüm denetimleri kısıtlama olmadan ve sormadan etkinleştir dışında.

Rizelli3 · 28 Şub 2021

Kod:

İndirmek için giriş yapmanız gerekmektedir.
(16 satır)

Yukarıda ki kodu kullanarak problemi çözdüm desteğiniz için çok teşekkür ederim belki başkasının işine de yarar.

Ömer BARAN · 28 Şub 2021

Ben, B1'deki yol bilgisini kendi bilgisayarımdaki gibi değiştirdim ve sorunsuz sonuç alıyorum.
Dosya ekte, kodlar öcneki cevapta verdiğim gibi.

.

	Klasörden Resim Getir / Boyutlandır - Hücreye Sığdır ridvansahin 5 Ara 2019 Makro Soruları
	Klasörden PNG Resim Çağırma ve Öğeleri Numaralandırma Feyzullah 16 Eki 2018 Makro Soruları
	Butona tıklayınca klasörden dinamik resim getirme jusovic 22 Nis 2021 Makro Soruları
	Klasörden Fotoğraf Çağırma ve Mail Gönderme Feyzullah 10 Eki 2018 Makro Soruları
	Kapalı Klasörden Bazı Uzantılı Dosyaları Çağırma wolfret 29 Eki 2018 Makro Soruları