Sicille Getirilen Resmi Hücre Boyutuna Göre Ölçekleme

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

YasarPiskin

Kullanıcı
Katkı: %5
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
M1 hücresindeki sicile göre I1 hücresine resim klasöründeki resimlerden sicile göre resim getiren çalışmada yapmak istediğim resimlerin I1 hücresinin boyutlarına göre getirilmesi hususunda yardımlarınızı rica ediyorum.
 

Ekli dosyalar

Merhabalar Sn. zompcu_80

Kod içindeki
Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (1 satır). Giriş Yap
satırını
Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (1 satır). Giriş Yap
satırı ile değiştiriniz.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (1 satır). Giriş Yap
satırından sonra
Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (2 satır). Giriş Yap
satırlarını ekleyiniz ve
Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (2 satır). Giriş Yap
satırlarını da pasif yapınız.
 
M1 hücresindeki sicile göre I1 hücresine resim klasöründeki resimlerden sicile göre resim getiren çalışmada yapmak istediğim resimlerin I1 hücresinin boyutlarına göre getirilmesi hususunda yardımlarınızı rica ediyor
Alternatif olsun resim klasör yolunu makroda kendinize göre belirleyiniz istediğiniz gibi çalışacaktır
 

Ekli dosyalar

Bu çalışma 32 bitlik işletim sisteminde çalışır sizinki 64 bitlikse çalışmaz
Private Declare Function CLSIDFromString Lib "ole32" (ByVal lpstrCLSID As Long, lpCLSID As Any) As Long
Private Declare Function OleLoadPicturePath Lib "oleaut32" (ByVal szURLorPath As Long, ByVal punkCaller As Long, ByVal dwReserved As Long, ByVal clrReserved As OLE_COLOR, ByRef riid As Any, ByRef ppvRet As Any) As Long

Hem 32bit hemde 64bitde çalışması için üstteki kodu aşağıdaki gibi değiştirin.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (7 satır). Giriş Yap
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Geri
Üst