Adds an addressee, a subject, and body text; applies the HTML format; sets the importance to high; and sends the message: : Email « Outlook « VBA / Excel / Access / Word

1. VBA / Excel / Access / Word
2. Outlook
3. Email

Adds an addressee, a subject, and body text; applies the HTML format; sets the importance to high; and sends the message:

 
Sub message()
    Dim myMessage As MailItem
    Set myMessage = Application.CreateItem(ItemType:=olMailItem)
    With myMessage
        .To = "yourName@yourSite.com"
        .Subject = "Preparation "
        .Body = "review."
        .BodyFormat = olFormatHTML
        .Importance = olImportanceHigh
        .Send
    End With
End Sub

 

Related examples in the same category