VBA about sending e-mail automatickly

  • Thread starter how to send a e-mail with a annex automa
  • Start date
Status
Not open for further replies.
H

how to send a e-mail with a annex automa

dear all ,

please help me to check the following VBA about sending e-mail automatickly,

i didnot know why can i not sent the TYPE of . pdf.

Sub SendMail(MailTo As String, MailTopic As String, MailContent As String,

MailAttachment As String)

On Error Resume Next

Dim objMail As MailItem

Set objOutlook = New Outlook.Application

Set objMail = objOutlook.CreateItem(olMailItem)

With objMail

> .To = MailTo

> .Subject = MailTopic

> .Body = MailContent

> .Attachments.Add MailAttachment

> .Send

End With

Set objMail = Nothing

End Sub

Sub test()

SendMail "zhaoyini1233732@163.com", "This is auto send mail by excel",

"enclosing is code", "C:\Outlook.xls"

End Sub

thank you

yini
 
S

Sue Mosher [MVP]

So what precisely happens when you try to use this code to send a PDF file?

Is this code running in the Outlook VBA environment or somewhere else? Have

you tried commenting out the On Error Resume Next statement?

Sue Mosher

"how to send a e-mail with a annex automa"

<howtosendaemailwithaannexautoma> wrote in message

news:CF173A8C-7DE9-41D6-B24A-43A4A251B3AE@microsoft.com...

> dear all ,

> please help me to check the following VBA about sending e-mail
> automatickly,
> i didnot know why can i not sent the TYPE of . pdf.

> Sub SendMail(MailTo As String, MailTopic As String, MailContent As String,
> MailAttachment As String)

> On Error Resume Next

> Dim objMail As MailItem

> Set objOutlook = New Outlook.Application

> Set objMail = objOutlook.CreateItem(olMailItem)

> With objMail

> .To = MailTo

> .Subject = MailTopic

> .Body = MailContent

> .Attachments.Add MailAttachment

> .Send

> End With

> Set objMail = Nothing

> End Sub

> Sub test()

> SendMail "zhaoyini1233732@163.com", "This is auto send mail by excel",
> "enclosing is code", "C:\Outlook.xls"

> End Sub

> thank you

> yini
>
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
M Help sending email but removing signature via VBA Outlook VBA and Custom Forms 5
D Close Oulook after sending emails via vba without outbox getting stuck. Outlook VBA and Custom Forms 1
Dilshad VBA editor opens when sending an email Using Outlook 2
P Threat to being a spammer while sending automatic Emails through VBA Using Outlook 3
P VBA for Dialog Box when sending Email Using Outlook 8
S Email Help: Sending Outlook email from Excel VBA Outlook VBA and Custom Forms 6
L Fetch, edit and forward an email with VBA outlook Outlook VBA and Custom Forms 2
BartH VBA no longer working in Outlook Outlook VBA and Custom Forms 1
W Can vba(for outlook) do these 2 things or not? Outlook VBA and Custom Forms 2
MattC Changing the font of an email with VBA Outlook VBA and Custom Forms 0
P MailItem.To Property with VBA not work Outlook VBA and Custom Forms 2
P Tweak vba so it can target another mailbox Outlook VBA and Custom Forms 1
A Outlook 2010 VBA fails to launch Outlook VBA and Custom Forms 2
richardwing Outlook 365 VBA to access "Other Actions" menu for incoming emails in outlook Outlook VBA and Custom Forms 0
W Create a Quick Step or VBA to SAVE AS PDF in G:|Data|Client File Outlook VBA and Custom Forms 1
J Outlook Rules VBA Run a Script - Multiple Rules Outlook VBA and Custom Forms 0
C Outlook (desktop app for Microsoft365) restarts every time I save my VBA? Using Outlook 0
D VBA Macro to Print and Save email to network location Outlook VBA and Custom Forms 1
TedSch Small vba to kill political email Outlook VBA and Custom Forms 3
E Outlook 365 Outlook/VBA Outlook VBA and Custom Forms 11
N VBA Macro To Save Emails Outlook VBA and Custom Forms 1
Z VBA Forward vs manual forward Outlook VBA and Custom Forms 2
J VBA Cannot programmatically input or change Value for User Defined field Using Outlook 1
J VBA for outlook to compare and sync between calendar Outlook VBA and Custom Forms 1
A Any way to force sort by/group by on search results with VBA? Outlook VBA and Custom Forms 1
E Default shape via VBA Outlook VBA and Custom Forms 4
A Change settings Send/receive VBA Outlook VBA and Custom Forms 0
Z Import Tasks from Access Using VBA including User Defined Fields Outlook VBA and Custom Forms 0
E Outlook VBA change GetDefaultFolder dynamically Outlook VBA and Custom Forms 6
justicefriends How to set a flag to follow up using VBA - for addressee in TO field Outlook VBA and Custom Forms 11
M add new attendee to existing meetings with VBA Outlook VBA and Custom Forms 5
D VBA code to select a signature from the signatures list Outlook VBA and Custom Forms 3
D Create advanced search (email) via VBA with LONG QUERY (>1024 char) Outlook VBA and Custom Forms 2
David McKay VBA to manually forward using odd options Outlook VBA and Custom Forms 1
FryW Need help modifying a VBA script for in coming emails to auto set custom reminder time Outlook VBA and Custom Forms 0
S vba outlook search string with special characters Outlook VBA and Custom Forms 1
S VBA search string with special characters Outlook VBA and Custom Forms 1
U Outlook 2019 VBA run-time error 424 Outlook VBA and Custom Forms 2
DDB VBA to Auto Insert Date and Time in the signature Outlook VBA and Custom Forms 2
F VBA to move email from Non Default folder to Sub folders as per details given in excel file Outlook VBA and Custom Forms 11
G VBA to save selected Outlook msg with new name in selected network Windows folder Outlook VBA and Custom Forms 1
F Excel VBA to move mails for outlook 365 on secondary mail account Outlook VBA and Custom Forms 1
B Zoom automatically next email item (VBA) Outlook VBA and Custom Forms 2
T vba extract data from msg file as attachment file of mail message Outlook VBA and Custom Forms 1
K Outlook Office 365 VBA download attachment Outlook VBA and Custom Forms 2
A VBA Script - Print Date between first email in Category X and last email in Category Y Outlook VBA and Custom Forms 3
N Help creating a VBA macro with conditional formatting to change the font color of all external emails to red Outlook VBA and Custom Forms 5
N Save selected messages VBA does not save replies and/or messages that contain : in subject Outlook VBA and Custom Forms 1
Y Filter unread emails in a search folder vba help Outlook VBA and Custom Forms 0
V vBA for searching a cell's contents in Outlook and retrieving the subject line Outlook VBA and Custom Forms 1

Similar threads

Top