Klasörden Resim Çekme

[YasarPiskin]

Excel Versiyonu

Excel 2016

Excel Sürümü

64 Bit

Excel Dili

Türkçe

Örnek çalışmada M1 hücresindeki sicile göre fotoğraf alanına resim klasöründeki resimlerden sicile göre resim getirme hususunda yardımlarınızı rica ediyorum.

 

[tugkan]

Merhaba,
Şöyle bir kod var ama geliştirilmesi gerekiyor. Başlangıç için aşağıya ekliyorum.

Bu kodu görmek için giriş yapmanız gerekmektedir (26 satır). Giriş Yap

 

[YasarPiskin]

Tugkan bey ilginize teşekkür ederim. EL'teki gibi uygulamaya çalıştım fakat yapamadım sanırım, rica etsem kontrol edebilirmisiniz.

 

[tugkan]

Dosyayı ayarladım. Aşağıdaki satırdaki resimlerin klasör yolunu sizin bilgisayardakine göre güncellemeyi unutmayın.
Makroyu CTRL+r tuşu ile çalıştırabilirsiniz.

ActiveSheet.Pictures.Insert("D:\Masaüstü\PERSONEL\Resim\" & resimadi).Select 'Resimlerin bulunduğu klasör yolu.

 

[YasarPiskin]

Tugkan bey dosyayı kendime göre ayarladım fakat yine olmadı. Sadece 1 resim geliyor. Daha farklı bir yolu varmı acaba.

 

[tugkan]

Sicil numarası bir tane olduğu için bir tane resim gelir. Toplu bir liste varsa hem dosyayı hem de makroyu düzenlemek gerekiyor.

 

[mars2]

Çok teşekkürler; harika olmuş.

 

[YasarPiskin]

Sayın tugkan ilginize teşekkür ederim.

 

[tugkan]

Rica ederim
Hayırlı olması temennisiyle

 

[merakli]

Bende elimdeki dosyayı basitleştirerek çalışan bir örnek ekledim