• FORUMU MOBİL UYGULAMADAN TAKİP EDİN

    Forumu isteyen üyelerimiz Tapatalk (Harici bir hizmet) üzerinden mobil uygulamadan takip edebilirler.
    iOS için : https://itunes.apple.com/app/id307880732?mt=8
    Android için : https://play.google.com/store/apps/details?id=com.quoord.tapatalkpro.activity
    adreslerinden indirebilirsiniz.

    Bir iki haftaya da foruma özel kendi uygulamamız yayında olacak.
ALTIN ÜYELİK Hakkında Bilgi
-----------------------

Outlook toplu mail gönderme

Katılım
27 Ekim 2017
Mesajlar
36
Beğeniler
1
Excel Vers. ve Dili
2010 TÜRKÇE
#1
Mail gönderirken To kısmına aşagıdaki gibi yazdıgımda aa2018 isimli hücrenin içinde yazılı olan tek bir mail adresine gönderiyor..Böylece kod bölümüne girmeden
hücrenin içerigini değiştirerek mailin gidecegi adresi de kolayca değiştirebiliyorum...
Set S1 = Sheets("Sayfa1")

.To = S1.Range("AA2018")

Peki benım elimde diyelim ki aa2018den aa2050ye kadar sıralı mail adresleri var.
To kısmına ne yazarsam bu adreslerin hepsine birden maili aynı anda gönderebilirimır?Böylece toplu mail göndermek istiyorum
 

turist

Destek Ekibi
Destek Ekibi
Katılım
18 Kasım 2009
Mesajlar
4,474
Beğeniler
272
Excel Vers. ve Dili
Excel2013 English
64Bit
#2
Mail gönderen kodu kendiniz tasarladıysanız;
For - Next döngüsü ile yapabilirsiniz.
Örnek:
For i=2018 to 2050
bu araya mail gönderen kod kısmı girer.
.To = S1.Range("AA"& i)
kodlarınız bundan sonra da devam eder.
.Send
kısmından sonra
Next i
yazabilirsiniz.
Not: Bu tamamen teorik bir örnek kod şeklidir.Kendi kodlarınızın özelliğine göre şekli değişebilir.
Çözüm bulamazsanız örnek excel dosyanızı foruma ekleyiniz.
 
Katılım
27 Ekim 2017
Mesajlar
36
Beğeniler
1
Excel Vers. ve Dili
2010 TÜRKÇE
#3
Teşekkür ederim.
Sıralı mail adreslerini aralarında noktalı virgül olacak şekilde tek bir hücrede birleştir şeklinde kod yazdım...
.To kısmına da bu hücreyi tanımladım.Böylece istedigim tüm adreslere mail gidiyor.
Sizin önerdiginiz kodu denicem.Teşekküre ederim
 
Üst