Sending a Message : Email « Outlook « VBA / Excel / Access / Word






Sending a Message

 
Sub sendingmess()
    Dim myMessage As MailItem
    Set myMessage = Application.CreateItem(ItemType:=olMailItem)

    myMessage.Send
End Sub

 








Related examples in the same category

1.Send email for all records in an Access table
2.Send email by Using POP3
3.Display the information in a list of mails
4.Searching for Items
5.Adds an addressee, a subject, and body text; applies the HTML format; sets the importance to high; and sends the message:
6.Send a table through email
7.Using the CreateItem Method to Create Default Items
8.Send out an email by using the DoCmd.SendObject