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
 
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
H using VBA to edit subject line Outlook VBA and Custom Forms 0
G Get current open draft message body from VBA Outlook VBA and Custom Forms 1
Geldner Problem submitting SPAM using Outlook VBA Form Outlook VBA and Custom Forms 2
P VBA to add email address to Outlook 365 rule Outlook VBA and Custom Forms 0
M Outlook 2016 outlook vba to look into shared mailbox Outlook VBA and Custom Forms 0
V VBA Categories unrelated to visible calendar and Visual appointment Categories Outlook VBA and Custom Forms 2
D Outlook VBA forward the selected email to the original sender’s email ID (including the email used in TO, CC Field) from the email chain Outlook VBA and Custom Forms 2
R Outlook 365 VBA AUTO SEND WITH DELAY FOR EACH EMAIL Outlook VBA and Custom Forms 0
R Outlook 2019 VBA to List Meetings in Rooms Outlook VBA and Custom Forms 0
geoffnoakes Counting and/or listing fired reminders via VBA Using Outlook 1
O VBA - Regex - remove double line spacing Outlook VBA and Custom Forms 1
D.Moore Strange VBA error Outlook VBA and Custom Forms 4
B Modify VBA to create a RULE to block multiple messages Outlook VBA and Custom Forms 0
D Outlook 2021 Using vba code to delete all my spamfolders not only the default one. Outlook VBA and Custom Forms 0
K vba code to auto download email into a specific folder in local hard disk as and when any new email arrives in Inbox/subfolder Outlook VBA and Custom Forms 0
D VBA - unable to set rule condition 'on this computer only' Outlook VBA and Custom Forms 5
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 1
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 1
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

Similar threads

Back
Top