View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Mistry Mistry is offline
external usenet poster
 
Posts: 2
Default How to send email from excel

Hi All

I have the following bit of code which will send the excel workbook as
an attachment. I have it enter in the subject and set the flag for
read recipt to true but how do i enter some text into the main message
body.

Application.EnableAnimations = False
Application.ScreenUpdating = False
Range("D6").Select
Userid = ActiveCell.FormulaR1C1
Range("C28").Select
Addressee = ActiveCell.FormulaR1C1
Subject = "CC:PY:INFO03: " + Userid
ActiveWorkbook.Title = Subject
ActiveWorkbook.Subject = "EPG"
Application.EnableAnimations = True
Application.ScreenUpdating = True
ActiveWorkbook.SendMail Addressee, Subject, True
MsgBox "This form has been sent to Desk Europe. A copy is stored in
your Outlook Sent Folder."
On Error GoTo 0
End Sub


Any ideas?