Avatar of stopher2475
stopher2475Flag for United States of America

asked on 

Send word document as email with formatting preserved.

I was using this piece of VB to send use a word document as a template and send an email.
Set oItem = oOutlookApp.CreateItem(olMailItem)
With oItem
    'Set the recipient for the new email
   .To = "recipient@mail.com"
    'Set the recipient for a copy
    .CC = "recipient2@mail.com"
    'Set the subject
    .Subject = "New subject"
    'The content of the document is used as the body for the email
    .Body = ActiveDocument.Content
    .Send
End With

My problem is, under this method, I lose all the formatting like bold and underlined fonts. Is there any way to adjust this without losing the formatting?
Thanks,
Chris
Microsoft AccessMicrosoft WordOutlook

Avatar of undefined
Last Comment
R_Rajesh
ASKER CERTIFIED SOLUTION
Avatar of R_Rajesh
R_Rajesh

Blurred text
THIS SOLUTION IS ONLY AVAILABLE TO MEMBERS.
View this solution by signing up for a free trial.
Members can start a 7-Day free trial and enjoy unlimited access to the platform.
See Pricing Options
Start Free Trial
Microsoft Access
Microsoft Access

Microsoft Access is a rapid application development (RAD) relational database tool. Access can be used for both desktop and web-based applications, and uses VBA (Visual Basic for Applications) as its coding language.

226K
Questions
--
Followers
--
Top Experts
Get a personalized solution from industry experts
Ask the experts
Read over 600 more reviews

TRUSTED BY

IBM logoIntel logoMicrosoft logoUbisoft logoSAP logo
Qualcomm logoCitrix Systems logoWorkday logoErnst & Young logo
High performer badgeUsers love us badge
LinkedIn logoFacebook logoX logoInstagram logoTikTok logoYouTube logo