Excel - send email (outlook 2007) help required

[Jazzer]

Hello

I need to specify that the email is sent in plain text format

The code I am using is below...

Is anybody able to suggest the relevant amendment to this code?

Sub sendrangeEUR()
'
' sendrangeEUR Macro
' Select the range of cells on the active worksheet.
ActiveSheet.Range("M9:N9").Select

' Show the envelope on the ActiveWorkbook.
ActiveWorkbook.EnvelopeVisible = True

' Set the optional introduction field thats adds
' some header text to the email body. It also sets
' the To and Subject lines. Finally the message
' is sent.
With ActiveSheet.MailEnvelope
.Introduction = "Please note"
.Item.To = "thetestemail.com"
.Item.Subject = "LCH EUR MARGIN"
.Item.Send
End With
End Sub

Thanks

 

[BrianExcel]

Try taking a look at this thread and see if this solves the problem...

http://www.mrexcel.com/forum/showthread.php?59978-Setting-body-of-email-to-Plain-Text