• Merhaba Ziyaretçi,
    Microsoft 365 Uygulamaları ile ilgili yeni haberler, dikkat çekici konular, ilgi ile takip edeceğiniz yazılar için.

    Abone Olun
  • ESTE - Microsoft Office Eğitimleri

    Yeni yıl Microsoft Office Eğitim planlarınız için bütçenizi oluşturmadan önce ESTE eğitim kalitesi ile tanışın. 🙌
    Kullanıcıların ihtiyacı olan yazılı materyal, dosya ve video kaynağı desteğimiz ile tüm ofis çalışanlarının iş süreçlerini rahatlatacak eğitimler planlayın. 🎯
    Microsoft Office eğitimlerimiz hakkında detaylı bilgi için bize ulaşın.

    👉 Microsoft Office Eğitim Talebi

Yardım Mail Gövdesine Fotoğraf Ekleme

abdullahcakilli

Yeni Üye
Katılım
12 Eki 2020
Mesajlar
5
En iyi yanıt
0
Puanları
1
Yaş
31
Konum
İstanbul
Ad Soyad
Abdullah ÇAKILLI
Merhabalar;

Ekteki dosyamda belirli bir aralığı mailin gövdesine ekleyerek istediğim adreslere gönderen bir makrom var. Mailin gövdesine belirlediğim aralık haricinde 4-5 adet de fotoğraf eklemek istiyorum. Fotoğrafların boyutu otomatik belirlenen boyuta gelebilirse çok daha iyi olacak. Ekteki dosyalardan daha iyi anlaşılabilir.
 

Ekli dosyalar

  • ornekler.7z
    45.9 KB · Görüntüleme: 7

wexplorerx

Yeni Üye
Katılım
9 Tem 2019
Mesajlar
131
En iyi yanıt
5
Puanları
28
Konum
İstanbul
Ad Soyad
Murat Uzun
Office Vers.
Office 2016
Merhaba aşağıdaki gibi Shape'lere resimleri yükleyerek mail body'e ekleyerek deneyebilirsin.

ActiveSheet.Shapes("Shp_1").Fill.UserPicture "c:\Desktop\Dosyaadı1.JPG"

ActiveSheet.Shapes("Shp_2").Fill.UserPicture "c:\Desktop\Dosyaadı2.JPG"

ActiveSheet.Shapes("Shp_3").Fill.UserPicture "c:\Desktop\Dosyaadı3.JPG"
 
Üst Alt