Automate Outlook

[AndrewKent]

Hi there,

I had done this previously but for the life of me cannot find the template I built.

I'm looking to write a procedure within Outlook VBA that will do the following:

1) Create a new email
2) Complete the To:, CC:, Subject: and Message Body with whatever I want (I can define the variables there, not an issue)
3) Attach an excel file from a folder location.
4) OPen email on screen to be reviewed.

Any takers?

Kind regards,

Andy

 

[RoryA]

Something like:

   Dim Mail As MailItem
   Dim strMessage As String
   Set Mail = Application.CreateItem(olMailItem)
   strMessage = "this is the message"
   With Mail
      .Subject = "Important e-mail"
      .To = "Everyone"
      .Body = strMessage
      .Attachments.Add "C:\blah.xls"
      .Display
   End With

 

[AndrewKent]

Worked a charm thank you!