Great, because that means you can use the "Office envelope" feature to create the message directly from the Word document -- no copy and paste required:

Set env = ActiveDocument.MailEnvelope
Set itm = env.Item ' this is the Outlook message
itm.To = "
itm.Subject = "the subject"
itm.Send ' this will trigger a security prompt

etc.

If you want the user to be able to edit and set Outlook properties on the outgoing item, you can save the message and display it like this:

itm.Save
id = itm.EntryID
Set ol = CreateObject("Outlook.Application")
Set ns = ol.GetNamespace("MAPI")
Set msg = ns.GetItemFromID(id)
msg.Display


--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003
http://www.turtleflock.com/olconfig/index.htm
and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx

"Ridge Kennedy" wrote in message ...
Sue Mosher said (in reply to my poorly proofed message):

Selecting and copying the text from where?

The code is being run from a module in MS-Word. I have the text in a
temporaty ActiveDocument that has been created from a word template. I can
define the text I want to use as the body of my Outlook message as a range
object, or I can select and copy it in Word.

Ridge