Excel dosyasını mail gönderme.

1 2 3
23/06/2009, 12:44

pcman

Aslında bu komutla mail sayfası açabilirsiniz, varsayılan hangi programsa yeni maili açar,
Kod:
DoCmd.SendObject acSendReport, "deneme", acFormatXLS, "TO@deneme.com", "CC@deneme.com", "BCC@deneme.com", "Konu", "Mesaj"

bur da deneme raporunu Excel olarak gönderir

umarım iş görür
26/06/2009, 13:12

Seruz

Sn. besst,

Sorun çözüldü mü? Çözüldüyse, konuyu taşıyalım.
26/06/2009, 14:27

besst

Sn. Seruz


Konu hakkında değerli üstadlarımız farklı yollardan çözüm önerilerinde bulundu hepsine tek tek teşekkürlerimi sunarım.

Şimdilik Excel dosyasının Vista Windows Mail ile gönderimi soru işareti ama diğer gösterilen yöntemler muhakkak iş görür.

O yüzden konuyu taşımanızın benim için bir mahsuru yok,

iyi çalışmalar
26/06/2009, 14:42

nihatkr

(26/06/2009, 14:27)besst yazdı: Sn. Seruz


Konu hakkında değerli üstadlarımız farklı yollardan çözüm önerilerinde bulundu hepsine tek tek teşekkürlerimi sunarım.

Şimdilik Excel dosyasının Vista Windows Mail ile gönderimi soru işareti ama diğer gösterilen yöntemler muhakkak iş görür.

O yüzden konuyu taşımanızın benim için bir mahsuru yok,

iyi çalışmalar

Sub Excelden_Mail()
Dim objOL As Object
Dim objMail As Object
Dim objwShell As Object
Dim strEmail As String

strEmail = "krl_nht@hotmail.com"
On Error GoTo temizle
Set objwShell = CreateObject("wscript.shell")
objwShell.Run ("""C:\Program Files\Windows Live\Mail\wlmail.exe"" -activate")
Set objOL = CreateObject("wlmail.Application")
Set objMail = objOL.CreateItem(0)
With objMail
.To = strEmail
.Subject = [Sayfa1!h12]
.Body = "DENEME YAPIYORUZ BAKIN TARİHİ YAZDI"
MsgBox "TAMAMA BASINIZ", vbInformation, "NİHATKR TARAFINDAN YAPILMIŞTIR"
.send
End With
objwShell.Run ("""C:\Program Files\Windows Live\Mail\wlmail.exe"""" -stop")
temizle:
Set objMail = Nothing
Set objOL = Nothing
Set objwShell = Nothing
On Error GoTo 0
End Sub
26/06/2009, 15:48

besst

Sayın Nihatkr

Access üzerinden mail gönderme yolunu bulmaya çalışıyorum. Gönderdiğiniz kodlar Excel üzerinden mail gönderme kodu yanılmıyorsam. Eğer yanılıyorsam sizden ricam Ek'teki örneğe uyarlayabilirmisiniz. Çünkü o kadar uğraşmama rağmen bir türlü uyarlayamadım.

teşekkürler ,
İyi çalışmalar
20/09/2022, 16:49

altinerali

nihatkr; 
dosyanız işime yaradı ancak aşağıdaki gibi yapabilirmiyiz.

bu dosyayı herzaman aynı kişilere gönderiyorum, mail atacağım kişileri sabit olarak yapabilirmiyimz. birde bir hücredeki yazıyı mail konusuna ekleyebilirmiyiz (örneğin B14 hücresindeki yazı mail konu başlığı olabilirmi?) ben biraz denedim ama yapamadım.
yardımcı olursanız sevinirim.
selamlar.
1 2 3