View Single Post
  #2  
Old January 23rd 08, 04:57 AM posted to microsoft.public.outlook.program_vba
JP[_3_]
external usenet poster
 
Posts: 201
Default Insert standard text into a new message

Try

.Body = "Hello?" & .Body



HTH,
JP

On Jan 22, 9:08*pm, Gabe wrote:
Hello,

I am pretty new at this but, how do you insert standard text into a new
e-mail message without deleting the default signature? I am using the
following code:

Sub Macro1()
Set OutLk = CreateObject("Outlook.Application")
Set Email = OutLk.CreateItem(0)
With Email
.To = "
.Subject = "New Message"
.Body = "Hello?"
.Display
End With
Set Email = Nothing
Set OutLk = Nothing
End Sub


Ads