[vba]
Dim OutlookApp As Object
Dim Mail as Object

Set OutlookApp = CreateObject("Outlook.Application")
Set Mail = OutlookApp.CreateItem(0)
With Mail
.To = recipient@something.com
.Subject = "Your subject"
.Body = "insert text here"
.Display
End With
[/vba]

This will display the message and the user will need to click send. You can use .Send in the With statement, but unfortunately it displays an alert which can't be suppressed by "DisplayAlerts = False".
there is a way around, but I think it's fairly complex...