create and send emails using excel

**twofootgiant** · 04-15-2010, 08:00 AM

Hi guys,

Lets say I store a list of email addresses in column A. Then I have a set text in another cell.

I need a code that will take that text, paste it into a new email (Outlook 2007) and send it to the first email address in the list. Then repeat for the second, third, fourth and so on until it has sent an email to each of the addresses.

Any ideas?

**buran** · 04-15-2010, 08:06 AM

Hi,
have a look at Ron de Bruin's Example Code for sending mail from Excel:
http://www.rondebruin.nl/sendmail.htm

Buran

**twofootgiant** · 04-15-2010, 08:43 AM

Thanks for the reply, All of his codes are great, but they only allow information to be sent as an attachment i.e. a copy of the actual worksheets.

I need a code that will paste what is on the worksheet (within a specific range) into an email .

**buran** · 04-15-2010, 09:21 AM

hm, are you sure? :-)
Look at part 3 in the link I provided - Outlook object model (body)
This is 3rd example workbook. There you have (among other useful code):

Mail one worksheet in the body of the mail
Mail Range/Selection in the body of the mail
Mail selection, range or worksheet in the body of a mail with MailEnvelope
Mail a small message
Mail a message to each person in a range
Mail every worksheet with address in A1 (Body)
Insert Outlook Signature in mail
Mail a row to each person in a range
Mail a row or rows to each person in a range
Send a mail when a cell reaches a certain value Updated
Send mail with link to workbook

**jomili** · 04-15-2010, 09:33 AM

For a routine that already does what I think you want to do look at the long code at the bottom of my post here:
http://www.excelforum.com/excel-prog...ject-body.html