Skip to main content

AccessTr.neT


Excel Hücresindeki Bilgiyi Toplu Maillere Otomatik Ekleme

Oğuz Türkyılmaz
Oğuz Türkyılmaz
17
591

Excel Hücresindeki Bilgiyi Toplu Maillere Otomatik Ekleme

Çözüldü #1
Merhaba
Uygulamada toplu mail gönderiyorum. Bu mailleri gönderirken her mailin başına hitaben o mail adresinin bulunduğu satırın C hücresindeki Firma Unvan bilgisinin eklenmesini sağlamak istiyorum. Bu işlem normalde Office WORD uygulaması yardımıyla çözülüyor. Fakat uzun zaman alıyor.

Kodda .Body = ifadesinin devamında yer alan

"Sayın yetkili, Ekte 2021 WINPERAX Teknik Ürün Kataloğu dikkatinize sunulmuştur. İlginizi çekeceğini ümit ederek, firmalarımız arasında kalıcı bir işbirliği oluşması temennisi ile sağlıklı günler dileriz."

tümcesinde ki Sayın Yetkili ifadesinin Resimdeki bilgilere göre C sütununda yer alan Unvanlara göre değişmesini sağlamak istiyorum.


Sn.FIRATEX Alimünyum ve Camlama Sistemleri

Ekte 2021 WINPERAX Teknik Ürün Kataloğu dikkatinize sunulmuştur. İlginizi çekeceğini ümit ederek, firmalarımız arasında kalıcı bir işbirliği oluşması temennisi ile sağlıklı günler dileriz."

Sn.WINPERAX CAM BALKON SİSTEMLERİ AŞ.

Ekte 2021 WINPERAX Teknik Ürün Kataloğu dikkatinize sunulmuştur. İlginizi çekeceğini ümit ederek, firmalarımız arasında kalıcı bir işbirliği oluşması temennisi ile sağlıklı günler dileriz."

[Resim: do.php?img=10892]
.rar WINPERAX - F.rar (Dosya Boyutu: 114,37 KB | İndirme Sayısı: 1)
Access Çekirgesi 
[Resim: img-cray.gif]


Cevapla
#2
Alttaki gibi düzenleyebilirsiniz yada htmlbody olarakta yapılabilr

Visual Basic Code
        .body = "Sayýn yetkili," _
                & vbNewLine & vbNewLine & "Ekte 2021 WINPERAX Teknik Ürün Kataloðu dikkatinize sunulmuþtur." _
                & vbNewLine & vbNewLine & "Ýlginizi çekeceðini ümit ederek," _
                & vbNewLine & vbNewLine & "firmalarýmýz arasýnda kalýcý bir iþbirliði oluþmasý temennisi ile saðlýklý günler dileriz."
Cevapla
#3
Yada alttaki gibi olur.br ile alt boşluk yapılıyor.

Visual Basic Code
      .htmlBody = "Sayýn yetkili<br><br>" & _
                  "Ekte 2021 WINPERAX Teknik Ürün Kataloðu dikkatinize sunulmuþtur.<br><br>" & _
                  "Ýlginizi çekeceðini ümit ederek,<br><br>" & _
                  "firmalarýmýz arasýnda kalýcý bir iþbirliði oluþmasý temennisi ile saðlýklý günler dileriz.<br><br>" & _
                  "<br><br><br><br><br><br>Saygýlar"
Cevapla
#4
Feraz Hocam Eksik ifade ettim sanırım. Sayın "yetkili" İbaresini kaldırmak onun yerine satırda C sütununda yazan unvan bilgisini değişken olarak getirmem gerekiyor.

1.mail
.body = "Sayın " " WINPERAX CAM BALKON SİSTEMLERİ AŞ," _
                & vbNewLine & vbNewLine & "Ekte 2021 WINPERAX Teknik Ürün Kataloðu dikkatinize sunulmuþtur." _
                & vbNewLine & vbNewLine & "Ýlginizi çekeceðini ümit ederek," _
                & vbNewLine & vbNewLine & "firmalarýmýz arasýnda kalýcý bir iþbirliði oluþmasý temennisi ile saðlýklý günler dileriz."

2.mail
.body = "Sayın " "Yurt Cam Ayna ve Dekorasyon," _
                & vbNewLine & vbNewLine & "Ekte 2021 WINPERAX Teknik Ürün Kataloðu dikkatinize sunulmuþtur." _
                & vbNewLine & vbNewLine & "Ýlginizi çekeceðini ümit ederek," _
                & vbNewLine & vbNewLine & "firmalarýmýz arasýnda kalýcý bir iþbirliði oluþmasý temennisi ile saðlýklý günler dileriz."



3.mail
.body = "Sayın " "Esenyurt Cam Balkon Tozanlı," _
                & vbNewLine & vbNewLine & "Ekte 2021 WINPERAX Teknik Ürün Kataloðu dikkatinize sunulmuþtur." _
                & vbNewLine & vbNewLine & "Ýlginizi çekeceðini ümit ederek," _
                & vbNewLine & vbNewLine & "firmalarýmýz arasýnda kalýcý bir iþbirliði oluþmasý temennisi ile saðlýklý günler dileriz."

Şeklinde her mail adresine o mail adresinin geçtiği ID nin C sütunundaki unvanı eklemek istiyorum.
Access Çekirgesi 
[Resim: img-cray.gif]


Son Düzenleme: 11/04/2021, 15:44, Düzenleyen: Oğuz Türkyılmaz.
Cevapla
#5
Tamam abey zaten kodlar var müsait olunca hallederim.
Cevapla
#6
Sanırım işler karışacak.Çünkü mesela her mod 50 için nasıl satır bulunacak gibi.Diziye felan alınıp yapılabilir diye ümit ediyorum.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da