change font format in mail body using vba

[c_nixon]

i have the following code that opens a new mail and adds "UNCLASSIFIED
to the start of the subject and body. What i need is some code that wil
format the the body instance of the word to be bold and larger than th
rest of the text that will appear in the body (organisational rules).

Sub Unclass_Msg()
Dim msg As Outlook.MailItem
Set msg = Application.CreateItem(olMailItem)
With msg
.Subject = "UNCLASSIFIED - "
.Body = "UNCLASSIFIED"
.Display
End With
End Su

 

[Michael Bednarek]

i have the following code that opens a new mail and adds "UNCLASSIFIED"
to the start of the subject and body. What i need is some code that will
format the the body instance of the word to be bold and larger than the
rest of the text that will appear in the body (organisational rules).

Sub Unclass_Msg()
Dim msg As Outlook.MailItem
Set msg = Application.CreateItem(olMailItem)
With msg
Subject = "UNCLASSIFIED - "
Body = "UNCLASSIFIED"
Display
End With
End Sub

The code as presented above cannot possibly work; it's missing the
qualifying dots.

To the core matter: if you want to manipulate an HTML body, you have to
use the HTMLBody property, e.g.:

Sub Unclass_Msg()
Dim msg As Outlook.MailItem
Set msg = Application.CreateItem(olMailItem)
With msg
.Subject = "UNCLASSIFIED - "
.HTMLBody = "<b>UNCLASSIFIED</b>"
.Display
End With
End Sub