Hi all.. Can anyone tell me how I might change the font of the entire body of an email after it has been created using VBA? I've copied parts from a Word document and other parts from a database in Access (which is running the show). I have code such as:

With wrdApp.Selection
.WholeStory
.Font.NAME = "Courier New"
.Copy
End With

olMessage.Body = wrdApp.Selection

olMessage.BodyFormat = olFormatRichText

olMessage.Display

I would also like to be able to put the data in evenly spaced columns but it seems the Courier New font would accomplish that. (The user doesn't want an attachment. He wants the whole thing in the body of the email.)

Any ideas? Thanks in advance...Glenn