Setting format of an e-mail to HTML

[oleander]

Hi everyone,

I'm trying to do something that I think is kind of basic, but I'm new to VBA so please bear with me.

When I hit reply and the reply e-mail is still in the main Outlook pain, I want a button that will set the format of the e-mail to HTML. I have no clue if this is even remotely close or not, but it's not working:

Sub FormatHTML()
Dim myItem As Object
Set myItem = Application.ActiveInspector.CurrentItem
With myItem
    .BodyFormat = olFormatHTML
End With
End Sub

If anyone could help out, I'd appreciate it! Thank you!