View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
FunkySquid FunkySquid is offline
external usenet poster
 
Posts: 29
Default Sendin email with Excel macros

Do you need to have a From line as I think it populates it with the
default user anyway.
Don't forget to set your OutApp = nothing at the end also.

FunkySquid

Maurizio wrote:
Hi, I use this code to send multiple email, but I get a "run time error
438" with .From field, as if it isn't supported.

Does anyone known the solution?


Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(olMailItem)
With OutMail
.From = "
.To = IndirizzoEmail
.Subject = Oggetto
.Body = TestoEmail
.OriginatorDeliveryReportRequested = False
.Display
End With
Set OutMail = Nothing