Buton vasıtasıyla mail göndermede Problem

Ömer BARAN' Alıntı:

@mc_exrem .

VBA ekranını açın ve fare imlecinin, MODULE1'deki SuzYaz isimli makrodaki Call MailGonder satırına gelmesini sağlayın.
İmleç bu satırdayken, klavyeden F9 tuşuna basın. Böylece ilgili satır görseldeki gibi görünecek (bordo zeminli ve solunda bordo nokta).
VBA ekranını kapatın. Ardından sayfadaki YAZDIR düğmesine fareyle tıklayın, yazdırma işlemi yapıldıktan sonra VBA ekranı kendiliğinden açılıp bordo olan satırda duracak. Bundan sonra klavyeden F8 tuşuna aralıklarla basarak işleme devam edin. F8 tuşuna her basmanızda bir sonraki satır SARIya boyanır. Siz F8'e basınca, VBA sizi Mail Gönder makrosuna götürecek ve F8'e her basmanızda bir sonarik satıra geçecek.
Bakalım kodun hangi satırında sorun yaşayacaksınız.

Tabi belgeniz oldukça yavaş olduğundan, işlemler yavaş yürüyor ama ben bir sorunla karşılaşmadım yavaş da olsa MailGonder makrosunun sonuna kadar ilerleyibildim.

E-posta gönderme kodunun devreye girmeme nedeni sadece; F3 hücresindeki tarihte (BUGÜN) işlem kaydının olmaması halinde gerçekleşiyor.
Çünkü kodun ilgili bölümü, F3'teki tarihte kayıt yoksa MailGonder kodundan sonraki satıra geçilmesi öngörülmüş.

VBA:

İndirmek için giriş yapmanız gerekmektedir.
(19 satır)

.

Genişletmek için tıklayın ...

Ömer BARAN' Alıntı:

@mc_exrem .

VBA ekranını açın ve fare imlecinin, MODULE1'deki SuzYaz isimli makrodaki Call MailGonder satırına gelmesini sağlayın.
İmleç bu satırdayken, klavyeden F9 tuşuna basın. Böylece ilgili satır görseldeki gibi görünecek (bordo zeminli ve solunda bordo nokta).
VBA ekranını kapatın. Ardından sayfadaki YAZDIR düğmesine fareyle tıklayın, yazdırma işlemi yapıldıktan sonra VBA ekranı kendiliğinden açılıp bordo olan satırda duracak. Bundan sonra klavyeden F8 tuşuna aralıklarla basarak işleme devam edin. F8 tuşuna her basmanızda bir sonraki satır SARIya boyanır. Siz F8'e basınca, VBA sizi Mail Gönder makrosuna götürecek ve F8'e her basmanızda bir sonarik satıra geçecek.
Bakalım kodun hangi satırında sorun yaşayacaksınız.

Tabi belgeniz oldukça yavaş olduğundan, işlemler yavaş yürüyor ama ben bir sorunla karşılaşmadım yavaş da olsa MailGonder makrosunun sonuna kadar ilerleyibildim.

E-posta gönderme kodunun devreye girmeme nedeni sadece; F3 hücresindeki tarihte (BUGÜN) işlem kaydının olmaması halinde gerçekleşiyor.
Çünkü kodun ilgili bölümü, F3'teki tarihte kayıt yoksa MailGonder kodundan sonraki satıra geçilmesi öngörülmüş.

VBA:

İndirmek için giriş yapmanız gerekmektedir.
(19 satır)

.

Genişletmek için tıklayın ...

Ömer BARAN' Alıntı:

SuzYaz makrosundaki Call MailGonder satırındaki MOR rengin kalkmasını sağlayın.
Bu kez aynı mor rengin Mail Gönder makrosunda ilk Set ...... satırında olmasını sağlayıp VBA ekranını kapatın.
Sayfadaki düğmeye tıklayın, bu kez VBA ekranı Mail Gönder makrosunun o Set..... satırına gelince duracak,
bu aşamaya gelince tekrar F8 tuşuna aralıklarla basarak işlemi adım adım ilerletin, bakalım şim di ne olacak.
Bilgisayarınızda OUTLOOK uygulaması var değil mi?

Genişletmek için tıklayın ...

Ömer BARAN' Alıntı:

Sarı boyanan kısmın MailGönderme işlemiyle bir ilgisi yok.
Mail Gönder makrosunun son kısmında .Send ... satırı var o satırın sol başına TEK TIRNAK ekleyip etkisiz hale getirin.
E-posta göndermeye hazır olarak karşınıza gelmesi lazım.
Bu arada şu anda bilgisayarınızda OUTLOOK üzerinden e-posta gönderebildiğinizi de bir kontrol edip. kendinize bir e-posta gönderin ki emin olun.

,

Genişletmek için tıklayın ...