Macro or Code to save email as RTF files

  • Thread starter Thread starter Brent E
  • Start date Start date
B

Brent E

Good day,

I have numerous emails stored in a subfolder of my personal folder in
Outlook. The files are currently in an Outlook msg format. I want to
convert
them to RTF and store them.

I am curious if anybody knows of a macro or VBA that will save all emails
in
the folder as RTF and save them to a widows folder for example:
C:\Outlook\Messages

Please advise.

Thanks in advance,
Cordially,
 
I don't think that you can save an email as RTF through the object model.
You can save it as an msg file though. Would this suffice? If so I can
probably figure some code out for you. How would you want the file named?
 
Sure you can save an email as RTF, assuming it is an RTF message. To convert
it to RTF you would use item.BodyFormat = olFormatRichText (item would be
the mail item), then call Save on it, then call SaveAs using olRTF as the
argument for the Type parameter.
 
Back
Top