VBA Email Multiple Addresses

L

LanceLance

Board Regular
Joined
Feb 4, 2009
Messages
60
Hi all
I have a excel document that need to send out on a daily basis.
I have a simple button with the following code that enables me to send active workbook to 1 email address.
<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:eek:ffice:eek:ffice" /><o:p> </o:p>
Sub SendIt()<o:p></o:p>
Application.Dialogs(xlDialogSendMail).Show arg1:="name@address.com ", _<o:p></o:p>
arg2:="Daily Check Sheet " & Format(Date, "dd/mmm/yy")<o:p></o:p>
<o:p></o:p>
End Sub
<o:p> </o:p>
I now need to send this document to more than 1 person.
I have listed names and email addresses on first sheet but have not been able to work out how to attach email addresses to the email when generated??
<o:p> </o:p>
Any help?
<o:p> </o:p>
Kind Regards
<o:p> </o:p>
Lance
 

Excel Facts

Format cells as time
Select range and press Ctrl+Shift+2 to format cells as time. (Shift 2 is the @ sign).
Sort by date Sort by votes
Assuming the addresses are in column A then

Code: 
Sub SendIt()
LastRow = Range("A65536").End(xlUp).Row
For i = 1 To LastRow
Application.Dialogs(xlDialogSendMail).Show arg1:=Range("A" & LastRow).Value, _
arg2:="Daily Check Sheet " & Format(Date, "dd/mmm/yy")
Next i
End Sub

would probably work

Lee
 
Upvote 0
You must log in or register to reply here.

Similar threads

T
  • Solved
Sending daily emails based on criteria, with email body corresponding to parallel cell which holds email address(es)
Replies
1
Views
752
twinwings
T
P
  • Question
Signature is being removed when I run the rest of my VBA
Replies
3
Views
147
rollis13
rollis13
H
  • Question
VBA split file based and send splitted file in separate emails
Replies
0
Views
143
harmless92
H
melodramatic
  • Question
VBA Send Outlook email, Save email to file folder
Replies
3
Views
434
melodramatic
melodramatic
M
  • Question
Excel VBA Save PDF within workbook folder and send as email attachment
Replies
1
Views
203
rpaulson
rpaulson

Forum statistics

Threads
1,214,659
Messages
6,120,786
Members
448,992
Latest member
prabhuk279

Share this page

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top