Hello Everyone!

I have a very simple outlook emailer below
I notice in my new version of Excel (2003)
If I go to the menu and use File / Send / Mail Recipient
I have the option to add an "Introduction:" field
But when I do . in my code below I can't find it on the
list
Can anyone tell me what it's called, and if it's
available in earlier versions of excel.

TIA

Sxx


Sub SimpleSender()

Dim objOutlook As Object
Set objOutlook = CreateObject("Outlook.Application")

Dim objOutlookMsg As Outlook.MailItem

'Open Outlook
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
With objOutlookMsg

.Display
.Recipients.Add "
.Subject = "Believe it or not ........"
.Body = "This works" & vbCr & vbCr & " and is
Outlook Version " & CheckOLVersion


.Send


End With

Set objOutlook = Nothing


End Sub