paste into email

  • Thread starter Thread starter Annette
  • Start date Start date
A

Annette

Is it possible to within the macro to write a paste into the body of an
email?

Like in this code:

Set oMailItem = oOutlook.CreateItem(0)
With oMailItem
Set oRecipient = .Recipients.Add("(e-mail address removed)")
oRecipient.Type = 1 '1 = To, use 2 for cc
'keep repeating these lines with
'your names, adding to the collection.
.Subject = "The extract has finished."
.Body = "This is an automatic email notification"
 
Depends what you want to paste.
If just a selection of Data then that is straight forward.
If you want to paste an Image, post back for a routine that does this.
ie Pastes Images OR a selection as an Image.
 
Back
Top