How to send an email in excel?
Hello,
I am new to VBA programming.
What I want to do is to write a macro in excel.
There is a button in excel sheet, when I click the button, the excel will automatically send an email to all users listed from other sheet in excel.
The context in the email is the context shown in another excel sheet. I use outlook.
Any clue will be appreciated.
or any useful programming books.
Re: How to send an email in excel?
If you want to use Outlook from Excel then that is possible but you will generate the Outlook Security popup message. If this is ok then you can use code like below to generate the email, just add code to populate the body and iterate through the cells of addys.
VB Code:
Option Explicit
'Add a reference to msOutlook xx.0 Object Library
Private Sub CommandButton1_Click()
Dim oApp As Outlook.Application
Dim oMail As Outlook.MailItem
Dim i As Integer
For i = 1 To 10 'For ex.
Set oMail = oApp.CreateItem(olMailItem)
oMail.Subject = "Subject"
oMail.To = Sheet2.Cells(i, 1).Value
oMail.Body = Sheet2.Cells(i, 2).Value
oMail.Send
Set oMail = Nothing
Next
End Sub
Re: How to send an email in excel?