sending an excel sheet via outlook express

  • Thread starter Thread starter Alberto
  • Start date Start date
A

Alberto

I Usually use this portion of code to send an automated response using
outlook express:
Sub Send_Msg()
Dim objOL As New Outlook.Application
Dim objMail As MailItem
Set objOL = New Outlook.Application
Set objMail = objOL.CreateItem(olMailItem)
With objMail
.To = "(e-mail address removed)"
.Subject = "Automated Mail Response"
.Body = "This is an automated message from Excel. "
.Display
End With
Set objMail = Nothing
Set objOL = Nothing
End Sub

The question is:
How can integrate this code in order to:

1) send inside the body a cell interval content
2) send inside the body an entire sheet
3) attach to the message the specific sheet

Thanks, Alberto
 
Back
Top