Hi,
I send out the range with below code. But when I read the email, the
problem are 1. the content shifted to the middle 2. The email background
color auto changed to green (default should be white color). Anybody can
help? Thanks.

Sub Send_Range()
With ActiveSheet.MailEnvelope
.Introduction = "This is a sample worksheet."
.Item.To = "E-Mail_Address_Here"
.Item.Subject = "My subject"
.Item.Send
End With
End Sub